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SPERRY <= UNIVAC 


COMPUTER SYSTEMS 


SOFTWARE UNIT: 


Ident. Rev. Block Count 


Master 8411/8414 System Preparation Tapes 5.0 


Master Tape #1 
Master Tape #2 


REASON FOR RELEASE: 


i. 


Several enhancements to the RPG compiler, including the calculation 
time EXCEPTION operation. 


Initial release of a tape crose-referencing utility and a disc 
cross-referencing utility. 


Initial release of the 8411/8414 Direct Processor IOCS. 

The capability of adding records to a sequential disc file. 
Implementation of the System Execution Area and its related software. 
Revisions to many areas of Disc NCOS Software, including Sort Merge, 


Transients, Supervisor and Job Control, Assembler and Linker, Librarian, 
Dump/Restore and the Sequential Disc Iocs. 


SOFTWARE RESTRICTIONS: ; ! 


See individual Appendices for discussion of restrictions. 


HARDWARE CONFIGURATION - Minimum for System Generation: 


1. 
2. 


3. 


24-K Memory 4 
Two disc drives (8411 or 8414) 


Card Reader (type 9711) 


SPECIAL NOTES: 


1. 


Extensive changes have been made to all areas of the disc software. 
It is suggested you do not attempt to generate or use Thre software 
without first reviewing this release memo. 


All loadable modules have been upgraded to the latest revision level. 
The loadable supervisor includes the Control Stream from Diso feature, 
which may be used for system generation. The loadable R11T supplied 
is the latest version and includes the "Source Code from Disc Feature". 


Only one version of this disc software release has been prepared; 

its loadable supervisor uses the standard card reader (type %711) as 

a control stream reader. If it is necessary to generate a system 

which will employ a different control stream read device, the 
generation must be done at an installation which has the standard 

reader or else the loadables at the beginning of each master disc 

must be replaced with loadables generated and linked for the appropriate 
control stream reader before generating the final system. 


The default System Job Control Stream file for the Job Control program 
supplied herewith is SYSFILE (SJCS=SYSFILE) . 
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5. The loadable non-concurrent supervisor which is supplied for system 
generation purposes includes the following channel assignments. 


L.U.# (Hex) Channel Device 
ALL HEX 
PP-97 39-37 8411/8414 Disc Drives 
g8 G1 Card Reader 
go G2 Serial Punch 
ga 93 Bar Printer 
gB 97 1Z¢1 
ge g6 Row Punch 
gD G5 Optical Document Reader 
gE gc Paper Tape 
QF gB Drum Printer 


6. The following parameters were used to generate the loadable Supervisor 
in this release. This supervisor occupies 4,992 (X'138%') bytes. 


AFTR=ALL 
SIZE=24 
CSR=CRD 
DEVA=8 
SJCS=YES 
SYST=8411 
DCUL=xX'"3¢' 
UNT1=8 
DUMP=TEMP 







7. There is a loadable Disc ReportjProgram Generator on the master tape/ 
disc with a base address of X' 
parameter areas reserved. If this compiler meets the installation's 
requirements, the user can omit the linking of R11T, and use the 
loadable R11T included in this release. 


8. There is no objection to users substituting other program names for 
UNIVAC-supplied utilities, e.g. "PRGM PHASEZRO,*" may be changed to 
"PRGM DSORT,*" or whatever other name is desired in the linker deck. 
Names of overlays (PHASE statements) must not be changed however, nor 
may names of programs within the RPG or COBOL compilers be altered. 
Two versions of an RPG compiler (R411 plus R11T, Rev. 3 plus Rev 4, 
etc.) must not be present in the same sysfile. 


9. The following appendices are included in this release: 


A Master Tape/Disc Table of Contents 

B System Job Control Stream 

C System Generation Procedures 
-D Transient DNCOS 8411/8414 RPG : 
E 8411/8414 Sort Merge 

F Implementation of DNCOS in 16-K Memory 

G Tran and Transients 

H Supervisor and Job Control 

I 8411/8414 Disc Assembler (KSMB) 


J 8411/8414 Disc Linker (DL11) 
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Librarian (LIBS) 

Miscellaneous IOCS 

O0S-500 

8411/8414 Disc Utilities (DASM, DPRT, ISF) 
Dump/Restore Utility (DPRS) 

Tape Cross-Reference Utility 

Disc Cross—Reference Utility 

NOTE Job Control Card 

SKIP Job Control Card 

VOL Job Control Card 

Sequential Disc IOCS (DSPIT AND DTIFSD) 
Direct Processor 


DIFMT, DMTIO, DMTIT 


~*~ ££ ¢ ade nh wnowo zee 


The System Execution Area 
Y Halts 


10. Ali SUR's that were to be corrected in Revision 5.% are cleared with 
this release. 


ORDERING PROCEDURES : 


Master 8411/8414 System Preparation Tapes Rev. 5.% are available with this 
release on tape or 8411/8414 Disc. The software may be ordered by forwarding 
the attached "Software System Support Request" directly to Software Order 
Services with applicable Software Media. i.e. two tapes 

or two 8411 disc or 1 8414 disc unit. 


Sperry Univac 9200/9300 Software Coordinator 
PDC Software Order Services 

P.O. Box 500, Jolly & Township Line Roads 
Blue Bell, Pennsylvania 19422 


Note: All users outside of the United States should check with their 
local UNIVAC subsidiary office for distribution procedures. 
The above applies to United States Customers only. 


DESTRUCTION: 


This memo supersedes and orders the destruction of 92001I/9300/93001I 
Memo #141, dated August, 1974, and its updates. All corrections and 
changes described in Memo #141's update memos have been incorporated in 
this release. 
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APPENDIX A. MASTER TAPE/DISC TABLE OF CONTENTS. 


Below are listed the contents of this software release. They are broken down 
into "Tape #1" and "Tape #2", The library group "TAPESYS" on Tape #1 is 
deleted from software which is shipped on disc. 8414 recipients receive the 
entire release in SYSFILE on a single disc pack. 8411 recipients receive the 
contents of Tape #1 in SYSFILE on one pack and of Tape #2 in SYSFILE on 
another pack. The loadable SUPR and JBCN at the beginning of Pack #1 are 
duplicated at the beginning of Pack #2 for 8411 recipients. 


TAPE #1 
303 T aP= SYS 041775 
ELT Lb  JAPESYS SUF F TAPE /DISC SYSTEM 
ELT Lb TAPESYS SECN TAPE /DISC JBCN 
ELT L APESYS ; D1S DATA TAPE SERVICES 
ELT L  TAPESYS : DASM DISC SPACE MGMT gy 
ELT L  IAPESYS IDLIBS  TAPEV/DISC LIBS (SER: 
ELT £ TAPESYS TOLIBSA TAPE/OISC LIBS (ROW / 
ELT L  TAPESYS IWLIBS4 TAPEVDISC LIBS (1(C4) 
ELT S  TAFESYS TRICB411 TAPE-T0-8412 
EL? S$ TAPESYS TFTC3414 TAPE-T0-8414 
ELT £ IAPESYS JBCA TAPE/OISC JBCN 
ECE TAPESYS 041775 
ELT L SUPR 5.0 SUPERvISOR 
joie uae JBCN 5.0 JOS CONTROL 
ELY a DL11 LINKER 
ELT L TRA TRANSIEAT WRITE -CUT 
ELT OL KSME ASSEMBLER 
ELT L FHASEZRO SOR T/MERGE 
ELT L DASM =—->—COCCSC. SPACE MGMT v 
ELT OL DFRY DISC FRINT 7 
ELT L ISF ISAM FORMATIOR : 
ELT Lt DPRS DLME & RESTCRE 
ELT: “& LBs LIBRARY SERVICES 
ELT L LIES4 LIBR ARIAN(1004 PCH) 
ELT ot Les A LIBRARTANIROW PCH) 
ZLT ok XREF DISC XREF 
ELT Lt SHE AF SYSEXAR FORMAITCR 
ELT L “RIA TRANSIENT RFC 
ELT cL USERCEF 041875 
ELT L 1F6 1 DALS7Ss 
ELT Lt USEFI 041875 
ELT L TPG2 041375 
ELT L LSE FC CH1B75 
ELT L TPGS L41375 2 
ELT Lt RLLD 041375 Pa 
ELT L 1625 041375 
ELT OL cAL ti‘é‘iéwAL'S 
ELT bh 1 G43 04 1375 
ELT OL USER3UPR 041375 
ELT L 1G41 04 1875 
ELT tL USETTABL 041875 
ELT 4 1642 C41e75 
ELY Lt E C41875 
ELT OL M C4L8TE 
ELT L L 041375 
ELT L S C41875 
ELT: <b F 041875 
LT ok T6844 0413875 
ELI OL R3OC D41875 
ELT L R2DC 041875 


9200/920011/9300/9300II 
Memo #147 1 of 9 APPENDIX A 





cbt -t Ri c419872 
ELT 4 TEC 041875 
a ae T G46 041875 
ELT ob u 041375 
ELT OL v CHLETE 
ELT OL BG4G 041375 
a eo K 041375 
ELI OL Dee G41e875 
ELT ot DR £41875 
ELT OL 1047 GHLETS 
ELT OL m C41975 
ELT OL x G41875 
ELT LL” Te43 O41£75 
ELY L Y C41875 
ELT L H 041875 
ELT L z C41875 
ELT ok 1649 041375 
ELT OL A 041375 
ELY OL 8 641375 
-ELY OL 165) 04 1375 
ELT L MTA1 C4187 
- ELT ok M¥z1 041275 
ELY ob MT31 041875 
ELT OL MTG C41e75 
| ELT OL MIST 041375 
ELT OL MT6T C4175 
ELT L MIT?T 041975 | 
ELT ok MI 8 841875 ae 
| ELT OL 1651 Co1e7s - 
| ELT OL G C41875 
ELT L 5) CHLE7E 
ELT ot 1652 CuLe7s 
ELT ck 1D 1E C41875 
ELT oL To2E 041375 
ELF ok TO3E o41375 
ELT ob TOWE G41375 
ELT OL 1O5E CHLETE 
ELT OL IDGE CHLETE 
ELT ot ID7E Galé75 
ELT ob TOSE 041375 
ELT L IDSE C41875 
ELT L IDAE c41875 
ELY ob 1 OBE 041375 
ELT OL ID CE CH1875 
ELT ot IDDE 041875 
ELT oL TDEE 041875 
ELT OL DAE I CaHLe7s 
ELT L DBET 041875 
ELT OL DCE T CK1S75 
ELT Lb ODET 041375 
ELY ot DEET 041875 
ELT ob DFET 041375 
ELT L ocET CuLe7s 
ELT L OHET 041875 F 
ELT DIET C4i875 
ELT tL DJET 041875 
ELT ok DKET 041875 
ELT ob DLE I C41875 
| EURO DMET O4 1375 
| Ett ot DNET C4175 
ELT OL DOE T 041875 
ELT OL OPET 041875 
ELT L DGET 041875 
ELT OL DCE C4La7s 
ELT OL STPE C41e7s 
ELT OL woe C4175 
ELT OL woc 941375 
ELT OL TP1 041875 
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BOS = a2} 


ELT’ S$ FAZ8 

ELT S  FAZB 

ELY S FAzB 

ELT S  FAZE 

ELY S$ FAaz3 

cLT S$ faze 

ELT S FAZB 

ELT § FAZB 

ELT S Faze 

ELT S FAZB 

ECE FAZE 

‘BOG ~ MACROLiB 

ECE PACFOLIBUN 1¥AC 
BOG MACROLISUNIVAC 
ELT S PFACFOLIBUNIVAC 
‘ELT $ MA&CROLIBUNI VAC: 
806 MACROLIBUNIVAC 
ELT S PACKOLIBUNIVAC 
ECE PACFOLIBUNIVAC 
£0G MACROLIBUNIVAC 
ECE - PACKCLIBUNIVAC 
ELT S MACROLISUNIVAC 
Z.f S$ MACROLIBUNIVAC 
Et? S$ PACKOLIBLUNIDAC 
ELT S$ MACROLIBUNIVAC 
ELT S$ MACROLIBUNIVAC 
ELT S PACKOLIBUNIVAC 
ELT S PACFOLIBUNIVAC 
ELT S P#ACKOLIBLNIVAC 
ECE PACROLIBLUNIVAC 
E0G MACROLIBUNIVAC 
ECE PACROLIB 

BOG QLOC AT BL 

ELT ff FLOCATEL 

ELT R&R FLOCATBL 

ELT R FLOCATBL 

ELT R RLOCAT AL 

ELT R RLOCATAL 

ELT R RLOCATBL 

—E-T R RLOCATSL 

ELT R RLOCAT AL 

ELT oR FLOCATBL 

ELY R RLOCATBL 

ELT R RLOCATBL 

ELT R FLCCATBL 

ELT R RLOCATSL 

ELT R RLOCATBL 

ELT R ALOCATBL 
ELT R- KLCCATBL 

ELT RK FLCCATBSL 

ELT R RLOCATSL 

ELT & FLOCATEL 

ELT R RLOCAT AL Gace 
ELT R RLOCATBL 

ELT R  FLOCCATSL 

ELT & RLCCATEL 

ELT R RLOCATSL 

ELT R- RLOCATBL 

ELY R RLOCATSL 

ELT R FLCCATEL 

ELT RR RLCCATBEL 

ELT R LOC AT BL 

fb R RLOCATaL 

ELT A RECCATEL 

ELT R FLCCATBL 
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= XECMOOL 
EXECKCOL 

= XECMO OL 

= XE CMO OLLUPUT ABL 
EXECWCOLLUPLITABL 
EXECKOOLLUPLTABL 
EXECMOOL 

8411 

8411 

8411 

8hil 

31421 

3411 

8411 

8411 

84it 

8411 


TRINREL 
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SYS} 
SYSZ 
SYS? 
S¥S4 
LTOS 
cos 
LMSO 
LTU 

SFR 
CHAREES 


SUPF 
J&CN 


LUPCL 


OTFIS 
OTF OS 
OSPII 
DAMIT 
OTFSC 
OTFOH 
OMTIT 
ISAM 


041375 re 
5.0 SYSGEN #1 
E.0 SYSGEN 82 
E.C SYSGEN #2 

5.0 SYSGEN #4 

RL1T LINKER DECK 
LINK UTILITIES 
SAMPLE DECK 

LINK TAPE UTILITIES | 
SAMPLE FORMATTE2 2UN ; 
FCR ChANGING "S¥Sz" | V 
O4ls7e i 

G41497S i. 

C41875 


ON1S7S 
vse 4 
a r ‘ 


V23} 


tate 


SYS (Ree 
°T:) 


v1 2/28/75 : 
v3 RACKILE 
V1 2/26/75 


VE 10/18/73 
C4le7s 
041475 oN 


rn oo Fh; ee 


OL1 

DTS 

IBIF 
TMTP 

K ALO 

K ALL 

K A290 

K A21 
KA3C 

K AGO 

K AaL 
FHSC 
PHSA 
PHS1 
PHS2 
PHS? 
FHSE 
PHYA 
FHSE 
S?aTTPuT 
S AM? OPNL 
SAMZCFNZ 
S?QCLOSE 
S?aTTGET 
IS7HCPEK 
IS?CLOSE 
IS7EADIN 
LS?LADIN 
IS?HIADD 
IS? 95EIL 
IS7USETL 
IS?7GE IPT 
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ELT & FLCCATBL 
ELT RK FLOCATBL 
ELT RR RLECCATEL 
ELT 2 RLOCAT AL 
ELT RR FLOCATBL 
ELT RR FLOCATBL 
ELT R RLOCATSL 
ELT RK KLOCATBE 
ELT RK FLOCATEL 
ELT R RLOCATAL 
ELT AR FLCOCATBL 
ELT R &LOCATAL 
ELT A FLOCATBL 
ELT R RLOCATBL 
ELT RK FLCCATBL 
ELT RR FLOCATBL 
ELT R RLOCATSL 
ELY R RLOCATBL 
ELT R RLOCATBL 
ELT R FLOCATBL 
ELT R KLCCATBL 
ELT R RLOCATBL 
ELT R FLCCATBL 
ELT R RLOCATASL 
ELY R RLOCATBL 
ELT R KLOCATBL 

“ELT. R FLOCATGL 
ELT R RLOCATEL 
ELI AR FLOCATBL 
ELT R RLOCATAL 
ELT R .RLOCAT BL 
ELY R RLOCATBL 
ELF R RLOCATASL 
ELT RK FLOCATBL 
ELi RK FLOCATBL 
ELY RK RKLOCATBL 
ELT RK ALOCATBL 
ELT R RLOCATSL 
ELT R RLOCATEL 
ELY R RLOCATBL 
ELT R  RLOCATAL 
ELT R FLOCATBL 
ELT R  FLOCATBL 
ELT RK FLOCATBL 
ELT R RLOCATAL 
ELT RK FLCCATBL 
ELT R  RLOCATEL 

“ELT R RLOCATAL 
Eb R  RLOCATBL 

“ELT R RLOCATSL 
ELT R RLOCATSL 
ZLT R RLOCATEL 
ELt AR FLOCATBL 
ELT R RLOCAT BL 

LT R RLOCATSBL 
EL? RR RLCCATBL 
ELY R RLOCATBL 
ELT R RLOCATEL 
ELT RR RLOCATBL 
ELT & RLOCATBL 
ELT & FLOCATSL 
ELT R RLOCAT AL 
ELT & RLOCATBL 
ELT R RLOCATAL 
ELT RR FLOCATBL 
APPENDIX A 


Cc 


IS?FOWRT 
IS? INDEX 
T?P 1IGET 
T?PTIPUT 
T2PECFEN 
T7FCLCSE 
RIRO?TRN 
FARAM? 
FASTILOR 
ua?GTPT 
LG?CFCL 
RO??PRNT 
RPE ihEC 2 
RP G?WECS 
RPG 2WECL 
RFGA?7DD 
CCHZTRAN 
OSC? IPL 
FILE? 
D7H7IORE 
D?H71D 
D?H20P EN 
D7HICLOS 
O?H? AFIR 
D? H? KEY 
2$0I1SC 
LIBSC1 
Lieso2 
LIB ‘C3 
Lresos 

L 18506 
L16507 
1011 
IOTF 
DXFEF 
IXREF 
TRAKL 
EBXS 

TBRO 

T PU 

T BPR 
TECC 
TBR9 
FLUN 


- OSP2TR 


TERZIR 
OSP 1 
TPRTITR 
TPRYTR 
CARDIR 
PCH 

P Ci 
TP4al 
TP4Y 

P CHS 
PRNG 
I7St 
I?NS 
T2NL 
vT1 
TSF 
OSP3 
OPRI 
ATOE 
EBAS 





V3 FORTRAN DISC TRAN 


v8 Sree e 


CH1ETE 
v2 

v2 

v1 

v2 

v2 

v2 

vE 

v3 

v4 , ac” 
v4 

v3 

v4 

v2 


vA 121174 
v& 121174 
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RLOC aT BL ASES vo | 


cLT oR 
f:¥ R RLOCaTaL ETOa v2 | 
ELT’ R QLOCATBL OC G?XX v0 
ELITR RLOCATEL 18P3 vo as 
ELT R RLOCATAL ETOX v1 SY SP EPA 
ELT R QLOCATSL XTOE v1 
ELT RQ RLOCATBL MP oP ¥3 
ELT R RLOCATSL EDIT v1 
ELI R RLCCATSL SHERRI ovG | 
ECE FLOCATEL OWLETE 
END 041875 
4+ meres 
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oe 
ce 


ELT 
ELT 
ELI 
ELT 
ELT 
Eut 
ELT 
ELY 
ELT 
‘ELT 
“ELT 
ecLt 
ELT 
ELT 
ELT 
ELLY 
ELI 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELI 
ELT 
“ELT 
ELT 
LY 


ELT 
ELT 
ELT 
ELT 
ELY 
ELT 
ELT 
ELT 
ELT. 
CLT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 


BMBDBMAVAmMBDwBMBwMA A mM DDBDAADMDBDBAABAAmanMMDAnmn AM BDMABYMNAADMNAmMHAMVADDMDBADyA 


APPENDIX A 


6 of 9 


LEN1 
LENZ 
LENG 
FRM } 
PRM < 
PRM4 
TELS 
ROET 
USE FCEF 
EDT! 
RG1C 
USERT 
RG2C 
R G4T 
USERO 
R5 Ad 
RPES 
REED 
RPG7 
RCTE 
RCTF 
RESO 
RESC 
RESA 
RESE 
RE SF 
R10E 
RLOF 
RidG 
R1iOH 
Riot 
RE 11 
R1zC 
RI2E 
RG13 
R146 
Rive 
Rise 
RE 1E 
R1IGE 
R1i6c 
Ri7c 
Risc 
RE 19 
R620 
RG21 
R22C 
RE 2? 
RG24 
RE ZS 
RG26 


JAN 26 

JAN 26 

JAN 26 

9-1-7 6411N 
8-1-7C 84 11N 
9-1-70 3411N 
vz C5-30-74 
VeE  C2-C7-75 
98.00 OS tay 0:08: 

v3 5-74 

v5 4-13-74 
saanenwene 

vO CHAIN VERE 
¥3 3-17-75 
anenan 

v3 1-30-73 
Fee 29 

APR 22 €9 DISK 
JUN 7 CMN 

vi 

Vl 2-17-78 
9/30/70 8411 
vO 8-14-73 

V2 -C7-24-73 
O2/19/7C 8411 
Va 3-17-75 
03/26/69 DISK 
10/07/63 CISk 
v2 8-13-73 
SEPT 16 DISK 
06/12/69 CISK 
JAN ‘5 

vl 1-47-73 
O£-21-72 vi 
JAN 5 

9-15-72 v4 
OE/1G/ES DISK 
Vel C1-CT-i5 
Vel C1i-C7-75 
V3 3-17-75 

VO 02-27-75 
vO 02-27-75 
vi 10-16-72 
Wel CI-C7-75 
exuaqugun a 

aGgeuana 


vO 8-14-73 
10/7/71 CORN- 
aunawne 

MAY 3 

JAN 5 


“oo 


PG PREP R 
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ELT R R627 ALC Lf CHN 

ELT 2 R290 Ve? O1-C7-75 
ELT OR R2BE Ve2 CI-C7-7E 
ELT R R290 vel Cl-07-75 
ELT R R29E Vel Ci-C7-75 
ELT Of com! CHAIN vERB 

ELT R EFTY 10/02770 MNO 
ELT R IPA 12-17-70 R411 
ELT R R30C v5 2-10-75 
ILT R T3LE ¥e30 11-15-74 
ELY oR SLTR R1LIT) (08/10/71 
ELT OR R330 07/21/69 DISC 
ELT R RE 28 FEB 23 

ELT R RE3S vl 06-07-72 
ZLY oR CALC ¥e2 O1-07-75 
ELT OR CLS JUN 11 CMN 

ELT R DCMT CHAIN VERB 

ELT R cIse W200 2-10-75 
ELT R CIND va ==. 2-10-75 
ELT R OCSE S411 12/02/73 
ELT R NUTC ¥e3 €1-07-75 
ELT & RAFE 8411 12/02/70 
ELT R cOMT CHAIN VERB 

ELT R TR43 v3 4-20-74 

ILI oS USERSUBR Nee ee 

ELT R COMI CHAIN VERB 

ELT @ R4lc v2 02-16-73 
ELT oR TABE vi 12-15-74 

ELT & ETAB 12-17-70 R41] 
ELT TEB1 v2 2-11-75 

ELT R TEET v3 12-12-73 REE PREPR 
ELT § USEFIABL “"enee 

ELT R RG43 02~16-73 

ELT R E EDIT 

ELY R M 05-05-73 

ELT R L LOK UP 

ELT s CMN 03-13-74 vel 
ELT R F 12-28-71 v1 
cit R CCM} CHAIN VERB 

ELT & RX44 CHAIN VERB v.0 
ELY R R3DC CHAIN VERB ¥v.C 
ELT R R20C CHAIN VERB v.O 
zcLT oR RL 210 LM 02-23-73 
ELI R IEC Vel 12-C€1-74 
ELT OR COMI CHAIN VERB 

ELT 8 PRAS v4 G5-20~ 74 
ELT R U TRANS TABLE GuT®Ur 
ELT oR v v4 05-20-74 
ELT R RB4G vl «2-16-73 
ELT OR K vi 02-18-74 
ELI k COM CHAIN VERB 

ELT R DR4C @-01-73 v3 

ELT R DR v4 8-31-73 * 
ELT & R470 02-16-73 

ELT R W JUN 20. N 

ELT R x SEP 9.N RRP 
ELT R COMI CHAIN VERB 

ELT R Re 3 v-2 94-13-74 LR 
ELT R Y Vel C4-C7-72 
ELT R H 100 SHELL 

ELT R z ve2 C4H- 10-74 
ELT R RG4S 02-16-73 

ELT R A CS MAk 1 PUNCH 
ELT R B C5-CS-73 
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Ev.T 
fut 
Eul 
CLI 
ELT 


cil 


ot 


Ect 
ELT 

Eut 
ELT 
ELY 

ELT 

El 
ELT 

ELT 
ELT 
ELT 
ELT 
ELT 
ELT 
ELT 

ELT 
ELT 

ELT 
ELT 
ELT 
ELT 
ELT 
ELT 

ELT 
ELT 

ELT 
Eu! 
ELT 
ELT 
ELT 
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APPENDIX B. System Job Control Stream 


A new feature, System Job Control Stream is now available to 8411/14 9200/9300 
users. 


SJCS will process control streams that have been filed on the system medium 
without precluding the use of the control stream card reader as a means of 
presenting control streams to the Supervisor and Job Control. 


With the exceptions of the FINIS and SKIP Job Control Command Cards, images 
presented from either media will have the same function as they have had in 
the past. Further details on the function of the FINIS and SKIP Command Cards 
and a new Job Control Command Card RUN will be presented in subsequent 
paragraphs. 


The current limitations on the use of SJCS are: 


1. The system medium must be 8411/14, that is, SYST = 8411 (or 8414) in 
both SUPR and JBCN and, 


2. The control stream card reader cannot be the 1001, 
At initial program load (IPL) or 
when a FINIS image from disc is read (no FINIS loop when read from disc) or 


after a cancel (program, external or SKIP) the control stream card reader will 
process its control stream and will continue to do so until a RUN card is de- 
tected, at-which time (if error free) the system (disc) job control stream will 
be processed until one of the three conditions mentioned above occurs (IPL, 
FINIS, Cancel). 

One should be careful in placing DATE, DVCDN, DVCUP, JOB or SWAP images in 

the SJCS because of their pre-empting or being pre-empted by similar cards 
entered in the card reader control stream. 


When processing the control stream from the system medium all demarcation 

records (X'55' in the first position) such as ELT, BOG, EOG: etc, except END, 

will not be presented to either Job Control or the user program but will be 

skipped over to the next sequential record. END demarcation records, when detected 
as the next image to be presented will cause a halt to occur and when run is 
depressed a cancel will take place. 


A supervisor generated to process SJCS will be 680(10) bytes larger than the 
same supervisor generated without this capability. 


The RUN Control card is used to direct Job Control to the System Job Control 
Stream to find its next control card statement. The System Job Control Stream 
is defined as being a control stream residing on the system device. ., 

The format of the RUN control card is: 


LABEL A OPERATION A OPERAND 
/ RUN JOBNAME[, XX JC, FILENAME ]5 COMMENTS 
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M@ Positional Parameter 1 
JOBNAME - the name of the element containing the control stream to 
be presented to Job Control. The jobname is the name used 
in the YELT card when the element was placed on the system 
device. 


@ Positional Parameter 2 (optional) 


7 XX - the logical unit containing the jobname to be performed. 
If present, it is specified in two hexadecimal digits. 


omitted - logical unit $@ is assumed 


@ Positional Parameter 3 (optional) 


» FILENAME - the filename in which the jobname will be found. If 
present, it is specified by up to 8 alphanumeric 
characters. 


omitted - the filename that was specified when Job Control was 
generated will be assumed. 





EXAMPLES : 
LABEL B OPERATION 6 OPERAND ‘i B 
10: 16 : 
i “i Wie 0 Do 
teri. j--f--b-d dd. | oe ae reo Li aes Lk es wand ens (Sen a dou is is ead Weer ae ce 


Sen po a a a 
Aerie bs ILPHA Pls tvs tira tina obo 

! eae \ 

pat a eb a a 
BETA si MOBATLE vi iss tis ii tus a. 
appa tarsi tad 
potiotirii Piri tiaia toa dag 
4. (ae en ares & Ki Uy - AME) 2, CNTKESTs coisa 1 de te 














JOBNAME LOG UNIT FILENAME 
EX 1 ~ DISCPRT Vf) ig 
EX 2 — ALPHA gi * 
EX 3 — BETA go JOBFILE 
EX 4 — GAMMA g2 CNTRLST 


*the filename used will be that which the parameter SJCS was equated 
to when Job Control was generated. 
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SJCS Example 


In the example that follows, (System Job Control Stream Example) List 1 
represents a method of filing jobs into a file (SYSJCS) on logical unit @@. 
The LIBS being used to do this was Linked with 


DEL EQU xX'55! 12-8-2 Control Punch 
SENT EQU X'58! 2-8 (:) Sentinel Punch 


Note the use of the " VELT element name,*" command to allow the use of LIBS 
Command Cards and Job Control Command Cards in the elements being filed on the 
system medium. 


Note also it is assumed the Job Control program was generated with SJCS=YES 
so that the filename used as a default in RUN command cards will be SYSJCS. 


Presenting the control stream of RUN command cards as shown in List 2 will 
cause the following to occur: (any reference to XREF in command cards is for example 
purposes only) 
SXREF 1. Element GENERATE located in SYSFILE on logical 
unit #2 will be listed 


SXREF 2. Element CDS with the same location will also 
be listed 
SXREF 3. Element JBCN with the same location will be 


cross-referenced 


SXREF 4. The PINIS will direct Job Control to the card 
reader for its next command 


VTOCDASM 5. A DASM will take place which will list the vVTOC 
of the disc on drive #1 


VTOCDASM 6. The FINIS will direct Job Control to the card 
reader for its next command 


DSCPRINT 7. A DPRT in hex-char mode of data from drive 9% 
will take place. The data from Cyl 119 head £7 
will print followed by data from Cyl 119 head 92 
through Cyl 119 head $3 followed by data from 
cylinder 29@ head 9g. 


DSCPRINT 8. Since this job does not end with a FINIS (and 
if a cancel does not occur) the next job filed 
will take place (VTOCBASM) 


VTOCDASM 9. Steps 5 and 6 will be repeated here 
REMI 10. A listing and cross-reference of an Element called 
REM1 located in SYSFILE on logical unit 91 will 
take place 
REM1 11. At conclusion of the above,Job Control is 


directed to find the jobname VTOCDASM on logical 
unit @@ (default) in filename SysJcs (default) 
and process it. 


VTOCDASM 12. Steps 5 and 6 will be repeated here 
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GBS2 13. A halt display of Of9f#f2 demonstrates the successful 
conclusion of the control stream presented in 
List 2 
FINIS 14. If any programmed or external cancel had taken 
place in any of the above steps (or if a SKIP 
command card had been presented and made a match 
with the UPSI byte) then none of the subsequent 
RUN commands (or jobs) would have been executed 
and the control stream would have concluded with 
a FINIS loop. 
List 1 List 2 
/ DATE '060574! / RUN SXREF,%,SYSJCS 
/ EXEC LIBS J RUN VTOCDASM 
/ DATA C J RUN DSCPRINT 
SYSJCS,R / RUN REM1 
Vv REM1, * 7 PAUSE 292 
/ EXEC XREF / FINIS 
/ DATA C 
‘7 CTL N,W, 20, SCRATCH1,R, 91, SYSFILE REMI 
/REM1,,,,XREF 
V ELT SXREF, * 
/ EXEC XREF 
/ DATA C 
V' CTL N,W, 00, SCRATCH1,R, $2, SYSFILE 
VY FIND  /GENERATE 
V INS SXREF 
V FIND /CDS 
V INS 
MACROLIB/UNIVAC/EXECMODL/JBCN, , , XREF 
911999 DSCPRINT 
v') 62 $1192 11993 
G2 D2PDLL B20002 
VTOCDASM 





/ FINIS 
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SJCS Definitions 


Element 


Demarcation Record- 


Job 


Jobname 


SJCS Halts 


Display 
4PG1 


| APB2 


4F G3 


AFG4 


4PG5 


- the record that contains the Element name is called a 
Demarcation Record. Also called a Module. 


any record containing a X'55' in the first position. It, 


in turn, is a Beginning of Group (BOG), End of Group (EOG), 


Element (ELT), etc. 


- a procedure to be done by the computer made up of one or 


more programs. 


- the name of a job to be done, 


Specified in a RUN card 


and is the name of an Element (Module) under which one or 


more programs will be executed. 


If the execution of a given Job under a RUN procedure does 
not conclude with a FINIS and if no program causes a cancel 
to take place, then the next Jobname sequentially filed 

on the system medium will be processed, 


Meaning 


The control stream being processed 
from disc is about to go beyond the 
upper extent of the file 


An error has occurred in the CCW 
chain attempting to bring in the 
next block of images from the control 
stream file 


The current image that would have 
been supplied to either Job Control 
or the program being executed is an 
END demarcation record 


The filename cannot be found on the 
logical unit specified 


The filename has been found, but 
the jobname cannot be found in that 
file 
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Action 


depressing Run will cause 
a Cancel to take place. No 
options are allowed 


No response or a zero Key-in 
will cause a retry.of the 
COW chain. Any other re- 
sponse will cause a cancel 


depressing Run will cause 


a Cancel to take place. 
No options are allowed 


see Action to 4F%2 display 
(search for filename and 
jobname ) 


see Action to 4F%2 display 
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If it is desirable to cause the input of card data while processing a control 
stream which resides on disc, it is accomplished by the use of a card with a slash 
in column 1, "DATA" in columns 10-13, and "READER" in columns 16-21 in the disc 
control stream at the point where a "DATA" statement would otherwise be 
appropriate. The detection of this card by the Supervisor (actually done in 
the PARAM? transient) causes the next control stream image delivered to be the 
next available image from the "real" control stream reader. For any program 
which is using a standard DIFCS, this should be a DATA statement with 

c, T or B in column 16. When the program executes an EOJ macro, the 

Supervisor resumes reading control stream images from the System Job Control 
Stream file on disc. 


Since the presence or absence of the / DATA READER statement determines, at 
the time the program begins execution, the source of that program's control 
stream input, all control stream input to a given program must be from one 
medium or the other. The program is never aware of the medium from which 

its control stream is being read. This feature may be utilized by any program 
which reads control stream input without that program's being reassembled or 
recompiled. 


The following example illustrates a standardized assemble-link-execute control 
stream on disc in which both the assembler and the linked user program 
read data from the "read" reader: 


LIBS Run to Add Standard Assemble-Link-Execute Run to SYSJCS File: 


EXEC LIBS 

DATA C 
N,U,@,SYSJCS,R,@,SYSFILE 
ASMBLEX, * 

EXEC KSMB 

PARAM 9191,19,W, 9%, TESTFILE 
PARAM 9111,19,1,WORKONE 
PARAM 121,19, 1,WORKTWO 
PARAM 9131,19,9,PROCLIB 
DATA READER 

EXEC DL11 

DATA C 

CTL N,W,@,OBJFILE,R,%,TESTFILE,S,1,WORKONE 
PRGM TESTPROG, * 

LIBE RLOCATBL,#,RELOCLIB 
INCLUDE /TEST 


Bi 
Be 


MAAR ANAT INN 


EXEC TESTPROG,9#%,OBJFILE 
DATA READER 
FINIS 


hee 


FINIS 


Control Stream to Assemble and Test a Program: 
y RUN ASMBLEX (SYSJCS ON OP ARE DEFAULTS IN THIS SYSTEM) 


DATA T 

TEST START 9@ 
USING *,9,1,2 
etc. 

etc. 

END 


NASON 


“N 


/ DATA T 


° input data to program just assembled and linked 
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Control Stream Analysis 


In the lists and chart that follow an analysis is made of the sequence of 
events (conditions) and command cards that are valid and invalid. 


The command card list is a list of the 22 allowable command cards. Each 
card is followed by two numbers; the first number is the column in List 1 
of the chart in which you will find that card, the second is the column 


in List 2. 


‘Other Conditions are events that affect the validity of following command 
cards, o£ these, only Input Data is in List 2 of the chart. 


To use the chart, find the intersection of a given event or command card in 
List 1 and for the same (or different) condition or command card in List 2. 


The decoding of the entry in the intersection is found immediately after 
the chart. The condition or command card in List 2 takes place as the next 
event after the condition or command card in List 1 for the purposes of 


utilizing this chart. 


Command Cards 


ALT - 3,4 
@ ASSGN- 1,3 
CALL - 2,3 

@ DATA - 5,5 
DATE - 2,3 


Other Conditions 


IPL 2,- 


Notes 


OO & W NE 


control stream. 
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DVCDN— 


EXEC ~ 
@ FILE - 


2,1 
DVCUP- 2,1 
@@ end - 2,6 
3,3 

3,4 


Card Load 2,- 


Symbiont (COS, JCCN) only 
Not processed by Job Control; by Supervisor (PARAM), or a card I/O 
routine such as DIFCS (DATA and \END] ). 
Only if data present in control stream 
Only if tape input/output 

Only if system is tape oriented 

SKIP function is either Skip (2,3) or Cancel (6,3) 

FINIS image in system medium causes a reversion to the card reader for 


7 of 9 


@ FINIS- 2,2. @Q©@RSTRT- 3,4 
JOB - 1,1 RUN - 2,3 
@mitc - 3,4 23 
NOTE -— 2,3 6) SKIP -'3 
PARAM- 4,5 : 
PAUSE- 2,3 SWAP - 1,3 
UPSI - 2,3 
VoL - 2,3 : 
Input Date 5,7 Cancel 6,- 


» 
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FINIS 


ASSGN, 


AL 


PARAM 


INPUT DATA 


Code 
blank 


APPENDIX B 


CALL, DATE, 
SKIP, SWAP, UPSI, VOL 


T, FILE, MTC, RSTRT 


















END , 
UPS] 


SKIP, 





RSTRT 


Pepe fo fe fo fo [man, amor 







DVCUP, 
RUN, 







DVCDN, 
PAUSE, 
CARD LOAD 


FILE, MTC, 









DATE, 
NOTE, 


IPL, 


EXEC, 





FINIS, 
VOL, 


EXEC, NOTE, PAUSE, 


mfelele fo ele] amr 


lelelel | lela [ss ooo. oe 





Meaning 
Valid sequence 
ignored, card not processed - not an error 


valid if loaded program does not require Input Data, 41FD 
halt display if Input Date required 


4192 halt display if not following the EXEC card. Ignored if 
loaded program does not require Input Data and does follow 
EXEC. 41FD if following EXEC and Input Data required 


processed as [En] 


cards are processed and JOB and FINIS stop the Cancel procedure. 
DVCDN and DVCUP do not stop the cancel procedure. 
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"\ 


Ds 4192 halt display if loaded program does not require Input 
Data (after executing loaded program). 41FD if Input Data 
required by loaded program. 


D1 41CF halt display if following EXEC and loaded program does 
not require Input Data (after executing loaded program). 
Immediate 41CF if not following EXEC. 41FE if loaded program 
required Input Data. 

Eg 4192 halt display on detection of List 2 card 

El 41CF halt display on detection of Input Data 


NOTE: Although a JOB card following an UPSI card is not an ‘error’ the 
JOB card will reset the UPSI byte to binary zero. 
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APPENDIX C. System Generation Procedures. 


This Appendix contains a description of the steps to be taken to prepare a 
user's system disc using the master tape/disc received from UNIVAC. Those 
procedures which are described in 9200/9300 Series Operating System (UP-7531) 
will not be reiterated here except to point out recent changes or to clarify 
matters which have been the subject of questions. Most of the job control 
decks which are necessary for the accomplishment of systems generation are 
supplied on the master tape/disc. Each is catalogued in standard 9200/9300 
Tape/Disc Librarian format and may be punched out with the appropriate SELECT 
or FIND statement. The FIND statement is recommended, as thus facilitating any 
alterations which might be necessary. It is also recommended that all decks 
punched by LIBS be interpreted for ease of handling. Each deck will be punched 
with an ELT card preceding it which must be discarded prior to placing the 

deck in the reader for execution. Where the character "\7" appears below, it is 
to be taken as representing the Librarian's control character (normally a 
12-g-2 multipunch). 


The loadable Supervisor and Job Control which are distributed on 
the master disc have the capability of running a control stream 
from disc (System Job Control Stream feature). If the control stream decks 
which are provided herewith fulfill the needs of a given installation, they 
may be run as is from disc by the RUN statement. They may also be updated, 
as desired, by LIBS prior to running so as to effect any necessary changes. 


l. Prep all disc packs required for generation. 


If new disc packs, or packs of uncertain quality, are to be used for 
System Generation, the appropriate version of the 8411/8414 Prep Program 
should be run to initialize those packs. (8411 users should prep a 
minimum of 3 packs, 8414 users 2). The Prep is supplied in card-loadable 
form to all new users; UP-7835 should be consulted for operating 
instructions. During an initial full Prep no options should be selected, 
i.e., make the following replies to the indicated halt displays: 


Display Reply 

71g FF 

PH29 FF 

939 Hardware device address of disc unit 


containing pack to be prepped, i.e., 39, 
31, 32, etc. 
P49 9S 


2. Copy master tapes to disc packs. 


Those who receive this DNCOS release on disc packs should skip to 
paragraph 3; the procedures described in this paragraph are identical to 
those used by UNIVAC to copy its master tapes to disc pack(s) for shipment. 


A small additional library group, TAPESYS, is included at the béginning 
of the first of the two master tapes. The purpose of this group is to 
enable the copying of the remaining contents of both master tapes to two 
8411 disc packs or to one 8414 disc pack. TAPESYS includes the following 


elements: 
SUPR Tape-resident NCOS Supervisor 
JBCN Tape-oriented Job Control Program 
DTS Data Tape Services 
DASM Direct Access Space Management 
TDLIBS Tape/Disc Librarian (Serial Punch) 


TDLIBSA Tape/Disc Librarian (Row Punch) 

TBLIBS4 Tape/Disc Librarian (1004 Punch) 

TPTO8411 Run stream for copying master tapes to 2 8411 packs 
TPTO8414 Run stream for copying master tapes to one 8414 pack 
JBCN Tape-oriented Job Control Program 
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The Supervisor in TAPESYS has tape drives on channel 8 assigned to logical 
units Y-3 and disc drives with controller base address X'3f' assigned to 
logical units 4-7. Other logical unit assignments are identical with the 
disc-resident Supervisor described in the cover letter of this memo. 

The tape-resident supervisor was generated without any DUMP or REP 
capability. 


To begin system generation, place master tape #1 on tape unit g, and a 
scratch tape on unit 1. Punch the following run deck manually: 


/ EXEC TDLIBS (or TDLIBSA or TDLIBS4) 
7 DATA Cc 
CTL N,W,1,TAPE,R,{, TAPE 
V FIND /TPTO8411,,,PUNCH (or TPTO8414 for 8414 users) 
V INS 
/* REWIND 
/ FINIS 


Place the above run deck .in the reader and boot the tape-resident system 
from X'C#'. A deck will be punched out by the Librarian which may be used 
to allocate disc file space and to copy the master tapes to disc (s). 

This run deck will also be listed on the bar printer. If the user wishes 
to delete undesired elements from the master disc or add elements of his 
own, the appropriate Librarian commands may be inserted in this run deck. 


2a Dismount the scratch tape and mount master tape #2 on tape unit 1. Place 
the run deck punched by LIBS in the reader, mount disc pack (s) as necessary, 
and re-boot from X'C#' or restart the control stream by an X'E#' operator 
request. If X'1111' halts occur, X'E5' replies should be made. LIBS 
will transfer the contents of the master tapes to disc and provide a 
complete listing of all elements copied. When X'1234' is displayed, 
without feeding any cards _in the reader, set X'3f' in the data entry 
switches, then re-IPL from disc. The disc system will write out the transient 
file (TRANSCYL) and it is now possible to carry out the remainder of the 
System Generation from disc. 


NOTE: Although a version of LIBS is provided which will punch on the 
1004 punch, the tape/disc Supervisor has no 1004 capabilities and 
any punching which has to be done on a 1004 punch must be done 
under the control of a user-supplied supervisor. . = 


PHASE I 
3. Generate and/or Link SUPR, JBCN, DL11l and TRAN. 


The procedures described in this paragraph are commonly referred to as 
"Phase I" of System Generation. Paragraphs 4 and 5 describe "Phase II", 
which consists of linking the remainder of the software including the 

RPG Compiler. Phase I is begun with master disc #1 on disc unit 

g and a scratch pack on unit 1. Material with brackets [ ] indicates coding 
or actions whose inclusion is optional. 7 
There are four run decks provided with this release for the purpose of 
accomplishing Phase I of System Generation. The decks, all of which are 
in Sysfile on master disc #1, are as follows: 


Elt—name Description 


SYS1 24-K NCOS system, no tapes, no SJCS feature; 
Supervisor size <xX' '. 1080 
SYS2 32-K NCOS system with tapes and SUJCS feature; 


Supervisor size< X'189%'. 
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Elt—name Description 


SYS3 32-K NCOS (0S-500) system with inquiry capability from 
the system console,. roll-in/roll-out, SJCS feature, 
and no tapes; 

Supervisor size < X'23@7'. 


SYS4 32-K COS (0S-500) system with local and remote capabilities, 
single inquiry option, SJCS feature, print-buffering to 
logical unit zero, roll-in/roll-out, and magnetic tapes; 
Supervisor size < X'49@@'. 


The four Phase I decks just described were intended to serve only as samples 
of common DNCOS configurations. It is the responsibility of each installation 
to determine what system should be generated to meet its own needs. For 

this purpose, one or more of the UNIVAC-provided generation decks should 

be listed in order to ascertain what changes must be made to tailor the 

sample configuration to your own requirements. If desired, the generation 
deck may also be punched. To list [and punch] a Phase I generation deck, 

the following run deck should be punched manually: 


/ EXEC LIBS (or LIBSA or LIBS4) 
/ DATA C 
CTL N,W,9%,SCRATCH1,R,@,SYSFILE 
VY FIND /SYSn(,,,,PUNCH] S 
V INS 
/* 
/ FINIS 


Place the above run deck in the reader and boot the UNIVAC-supplied 
loadable Supervisor from X'3f'. A deck will be listed [and punched] 
by the Librarian which may be used as the basis of Phase I of System 
Generation. It executes the following: 


SY¥Sn ‘ 


DASM To allocate space on Unit One for Assemblies. 

KSMB To assemble the Supervisor. 

KSMB To assemble the Job Control Program. 

KSMB To assemble the Logical Unit/Physical Unit Tables. 

KSMB To assemble Printer/Punch Logical Units (PLUN). 

{[KSMB To assemble disc-to-print symbiont - SYS4 only] 

DASM To re-allocate space on Unit One for the Linker. 

DL11 To link the Supervisor. 

PAUSE 9991 

DL11 To link Job Control, Linker, TRAN, disc—to-print symbiont . 
*LIBS To punch out run stream decks for Phase II. (CDS & LTDS) 


The Assembler source decks which are included in SYS1-SYS4 are identical 
with decks used at UNIVAC to generate systems for testing of DNCOS Rev. 5.9. 
Each keyword parameter for Supervisor generation is annotated. The listing 
of the entire deck should be compared with the generation instructions 
contained in UP-7531 and an evaluation made of the user's requirements. 
Unnecessary parameters may be deleted, additional options added, and 

other changes made to reflect the needs of a particular configuration. 

The PRGM statements for linking JBCN, DL11, and TRAN will need to be 
modified after linking the Supervisor to reflect the value assigned to 

the symbol "E?HI" during that linkage. For this reason, a PAUSE statement 
is included between the two executions of DL1l. 


*If this deck is to be run on a system with Row or 1004 punch, the last 

EXEC operand should be changed to LIBSA or LIBS4. Although a version of LIBS 

is provided which will punch on the 1004 punch, the disc-resident Supervisor has 
no 1004 capabilities and any punching which has to be done on a 1004 punch 

must be done under the control of a user-supplied supervisor. 
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3a If one of the 4 supplied Phase I decks meets your requirements as is, 
Phase I of System Generation may be run by placing the following 2 cards 
in the reader and.re-booting from X'3f' or restarting the control stream with 
an X'E@' operator request: 


/ RUN SYSn 
/ FINIS 


If it is necessary to modify one of the supplied run decks before 
accomplishing Phase I, the punched deck may be updated by manually inserting 
and deleting cards or the Librarian may be used to effect the change on 
disc so that the corrected generation deck may be run directly from disc. 

To assist in performing such an update, a small library file named SYSJCS 

is available which has a capacity of 223 card images on 8411 (849 on 8414). 
A sample control stream, CHANGE3, is provided which illustrates the 
modification of the SYS3 run to cause it to generate a non-inquiry OS-500 
system which logs only JOB, EXEC, CALL and FINIS control stream images. 
CHANGE3 is listed herewith: 


/ EXEC LIBS 

/ DATA C 

VY CTL N,W,%@,SYSICS,R,@,SYSFILE 
V FIND /SYS3 























V COR 26 
V COR 39,31 
VCOR 45 
CLOG=JECF 
V COR 162,13 
VcoR 129 
_ _PRGM JBCN,X'1cpg' 
VY COR: 124 
PRGM DL11,X'1CgP' 
V COR 129 
PRGM TRAN,X'1C@9' 
: VY INS 
/* 
Gi RUN SYS3,9%,SYSJCS 
/ FINIS 


This run would be executed by submitting the following cards in the 
| control stream: 


/ RUN  CHANGE3 
1 FINIS 





After making the necessary changes to a SYSn run deck by LIBS, the 
updated run could be executed by submitting the following control stream: 


/ RUN SyYSn,%@,SYSJICS 
/ FINIS 





OR a manually-corrected run deck could be placed in the reader and 
UNIVAC-supplied loadable Supervisor may be booted from X'3f' or the 
| control stream restarted by an X'E#' operator request. Upon successful 
completion of the run, 


-- SYSFILE on unit 1 will contain loadable Supervisor, Job Control, 
Linker, and TRAN, which are generated for the user's 
configuration. 


-- Run decks for the accomplishment of Phase II will have been listed 
[and punched out]. 


-~- A bootstrap block will be written on logical unit 1. 
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PHASE IT 
4. Link Utilities. 


It is assumed that the remainder of the generation procedures will be carried 
out with the Supervisor whose generation was described in "3." above. If it 

is not possible to execute this Supervisor on the machine where generation 

is being done, consult Paragraph 7 of this Appendix for deviations involved 

in using the Supervisor on the master disc. If the Supervisor generated during 
Phase I includes the SJCS option the execution of Phase II may be accomplished 
by means of RUN statements to execute the appropriate combinations of CDS, 

LTU, and LTDS. If Phase II of System Generation is done through the RUN 
statement, the following cards must be inserted in the card reader ahead 

of the first RUN statement: 


/ EXEC TRAN, #1 
7 DATA T 
je (blank except for 9M in cols. 39,40) 


This is necessary because Job Control's RUN routine makes use of transients. 


CDS 
The run deck labelled "CDS" may now be placed in the reader and the 
newly-generated Supervisor booted from X'31'. SJCS users may run it via: 


NOTE: LIBS linker cards supplied supports only 
disc. Disc/Tape LIBS linking instructions 
reference UP-8028. 


-- TRAN will be executed to write transients on TRANSCYL on unit 1 
for use during Phase II. 


fp RUN CDS 
/ FINIS 


-- Then DL11 will be executed to link all UNIVAC-supplied utilities 
at the base address which will be in effect with the user's 
Supervisor. If the configuration includes magnetic tape units, 
the linking of DTS and TPPR may be accomplished by running the 
deck labelled "LTU" immediately after CDS. The sequence of linker 
statements for each utility should be maintained. To minimize 
possible errors, all linker statements are sequence numbered. 


-- SHEAF is then executed to pre-format the System Execution Area and to 
write Job Control, LIBS and the Sort/Merge in it. Additional 2 
: UNIVAC-supplied or user-supplied programs may be added to SYSEXAR 
at this point if desired. See Appendix X. 
Upon completion of this run, SYSFILE on unit 1 will now contain loadable 
versions of all UNIVAC-supplied utilities. 8411 users must now dismount 
master disc #1 from unit g and mount master disc #2. 


LTDS 


5. Link RPG Compiler. : 


The run deck labelled "LTDS" may now be placed in the reader and the user's 
system booted from X'31' or the control stream restarted by an X'EO' 
operator request. The R11T compiler will be linked into a scratch file 

on Unit g, then copied by LIBS behind the other loadable elements in 
SYSFILE on Unit 1. This procedure is necessary due to the internal design 
of the compiler. Before carrying out this run, the RPG compiler link deck 
may be modified to reflect label areas for load-—and-go compiler capability 
or non-standard printer logical unit number. (See Appendix D). 


SJCS users may accomplish the linking of the RPG compiler via: 
/ RUN LTDS 
/ FINIS 
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LMSD 


6. COPY Relocatables and Macro Libraries. 





SYSFILE on unit 1 now contains all loadable elements of UNIVAC software which 
will be required for the operation of the user's 9200/9300 system. If 
programming will be done in the Assembler language, such additional elements 
as are required may be copied from master disc #1 and/or #2. The Table of ns 
Contents contained in Appendix A should be consulted to determine the locations 
of the desired elements. Remember that all macros must be placed in "library 
groups" within "library files" to enable them to be located by the Assembler. 
Those macros whose use is unnecessary in the current transient DNCOS but whose 
use might be required under MOS or an earlier level of DNCOS which did not 

use transients are distributed on 8411 master disc #2 (or last. part of 

8414 SYSFILE) in library group, NONTRAN. The run deck labelled "LMSD" is a 
sample of an execution of LIBS to add macros and relocatables to SYSFILE. 


7. Procedures for System Generation if Final Confiquration Unavailable. 


It is sometimes necessary to generate an operating system and other 
software on a machine other than the one on which the system will be 
used. This will normally present few problems if the procedures involved 
in systems generation are understood. The instructions contained in this 
appendix are intended only as general guidance. The specific procedures 
carried out will depend on the configuration differences which are 
involved. 


If the Supervisor which is generated during Phase I cannot be operated 

during Phase II due to differing channel assignments, unavailable 

hardware, etc., it is suggested that the Supervisor provided on the master 

disc be used while linking the user's utilities and compilers. Instead 

of rebooting from X'31', as described in paragraph 4 above, the linking 

of utilities would be accomplished with the Supervisor which was 

already booted from X'3f'. The execution of TRAN which occurs at the 4 
beginning of the "CDS" link deck would have to be deferred until the : 
generated system could be operated on its final configuration. Since 

there are also copies of SUPR, JBCN and the transient file on 8411 

Master Disc #2, the linking of the RPG compiler would proceed as described 

in paragraph 5 above with the Supervisor from X'3f' being used instead 

of the Supervisor from X'31'. The use of the Linker on Logical Unit One 

insures that all elements are linked at the base address which will be 

in effect when the system is placed into operation. 


If the user's linker is linked at a lower base address than can be used 
with the UNIVAC-supplied SUPR,:as could happen when generating a 16-K 
system, the user's generated SUPR could be loaded from X'31' on a larger 
machine and used to run Phase Two as long as its memory size was changed to 
reflect the size of the machine being used. This is accomplished by 
keying in to the location represented by the tag "E?TM" a X'5F' or X'7F' so 
as to be able to take advantage of the larger machine's memory size. 


B. Concurrent Operating System Generation. ‘ 


There are no significant differences to be observed in generating a 
concurrent operating system (COS). UP-7531 Rev. 5 describes possible 
changes to the system generation deck and linking of alternate print modules 
if buffered printing will be used. 


All print modules described in UP-7531 were assembled with DEVA=E. All 
were assembled with DIFPZ instead of DIFPR; if buffered printing is 
desired, DIFPR must be used. The element-names of print modules supplied 
with this release all have "TR" appended, e.g., DSP2TR is the element-name 
for the print module which was assembled with DSP2 as its label on its 
START line. 


9200/9 20011 /9300/9300II 
APPENDIX C 6 of 11 Memo #147 


In generating the Supervisor and Job Control, there is no difference between 
specifying SYST=8411 and SYST=8414. Identical code is generated. Any 
operating system, UNIVAC software, (except the PREP), or user program which 
uses standard Disc IOCS which executes in an 8411 environment will execute 
with 8414's and vice versa, and will execute in a mixed 8411/8414 system. 
Installations which are contemplating the conversion from one type of drive 
to the other must only ensure that their Supervisor is generated with 
sufficient disc 8414 drives to an 8411 control unit; it IS possible, however, 
to connect 8411 drives to an 8414 control unit. This my be the simplest 
method of making the transition from 8411's to 8414's, 


NOTE: Different volumes of a single file cannot be on both 8411's and 
8414's. 
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APPENDIX C 


TPTO8411 
(TPTO8414) 


BOOT: X'91!' 


3. 


Prepare a sufficient 
(see table) number of 
discs for the system 
generation. 


The 'SCRATCH DISC' on 
unit 1 will become the 
systems disc at the 

end of Phase I, Para 3a 


If received on disc 
proceed to Para 3, 
if not, to Para 2. 


#_OF DISCS TO PREP 


7 BXEC TDLIF 
OR (TDLIBSA 
OR (TDLIBS4 


BOOT: X'C' 


TPTO8411 
(TPTO8414) 


Prepare a control 
stream (A) which will 
find and punch-out the 
appropriate: (See NOTE 1 
below) control stream 
to copy the master 
tapes to master discs. 


The punched output is 
input in Para 2A. The 
listing is for the user¢ 
reference. 


8411 users - TPTO8411 
8414 users - TPTO8414 
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ASTER 
TAPE #2 


4 EXEC TDLIp 


BOOT: X'C#' 
OP REQ: X'E@' 





E. TRAN - Write out system 


Punched output from 
Para 2 is used to perform 
the following: 


A. DASM —- Allocate space on 


drive @ and, if 8411, 
drive l. 


B. TDLIBS - Copy master tapes 1 


(TDLIBSA) and 2 to drive 2, 
(TDLIBS4) and if 8411, drive 1 


Cc. Pause 1234 


D. Re-boot from '3f' (DISC) 


transients to 
TRANSCYL on drive 9% 


Prepare a control stream (B) 
which will list and/or punch 
out the desired Phase I 
control stream, which after 
review by the user will be 
used in 3A below. 


A listing will be produced for 
assistance in reviewing the 
Phase I deck. It is 
recommended the deck be 
interpreted. 


os 
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1. Tailor SySn contents to 
installation requirements. 


2. At pause 'G9G1' determine 
load address for JBCN, 
DL11 and TRAN based on 
E?HI value from SUPR 
linker. In determining 





















PHASE I the load address, consider 
the possible desirability 
of using: 


a. A modulo 8 address for 
disc I/O programs. 

b. A modulo 128 address 
in a communications 
environment. 

c. An allowance for 
expansion in the 
Supervisor without 
requiring re-programming. 


. ' ' 3. The *CDS*, "LTU't, and 'LTDS' 
SRAREG® a ae control streams decks that 
are [punched out] and 
listed will be used in 
Phase II to link the 
Univac-supplied disc and 


Link Univac-supplied 
utilities. 


TRAN write-—out. 


If no magnetic tape at 
users installation, 
use of 'LTU' is 
unnecessary. 


All loadables (SUPR, etc) 
listed in 3A, plus all 


utilities listed here, 
will be in SYSFILE at 
the end of this run. 


KSMB 

PHASEZRO (SORT) 
DASM 

DPRT 

ISF 

DPRS 
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PHASE II (Cont.) 


BOOT: X'31' 
OP REQ: X'E#' 


SMB & DL1 


RPG 
ELEMENTS 


11 of 11 


Modify the 'LTDS' control 
stream deck as necessary 
to obtain necessary label 
areas for 'LOAD-AND-GO' 
capability, or non-standar¢ 
standard printer logical 
unit numbers (See Appendix 
D). 


The 'LTDS' control stream 
punched out in 3A will be 
used to link the R1I1T 
compiler into a scratch 
file on unit g. It will 
then be copied by LIBS 
into Sysfile (behind the 
other loadables) on 

Unit l. 


Create a control stream 
as required by the 
installation to copy 
whatever loadable, 
relocatable or source 
elements will be needed 
on the ‘SYSTEMS PACK' 
for the efficient opera- 
tion of the installation. 
LMSD may be used for this 
purpose. 
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APPENDIX D. TRANSIENT DNCOS 8411/8414 RPG 


A. SOFTWARE UNIT: 


Ident. 


RIT. 


B. REASON 
1. To 


ae 


2. To 


a. 


b. 


Rev. 


Transient DNCOS 8411/8414 RPG 5.0 


FOR _ RELEASE: 
correct the following problems: 


The RG#84I error diagnostic (failure to edit a numeric 
field on output) has been changed from an gD14 halt to a 
non-fatal SD#1 halt. 


The out of sequence JE11 message is changed to await a 
reply for OS-5@M systems. 


When OR indicators were specified with ADD output specifications, 
a 25ul display occurred. 


A Processor Abnormal condition occurred when a LIMITS tape 
was closed. 


The 8411/8414 SAM IOCS routines used to handle object time 
tables were updated to the most current version. The volume 
number check error that occurred is now eliminated. 


implement the following: 


The calculation operation EXCPT is now available in the R11T 
compiler, The Exception operation allows records to be outputted 
‘to different types of output files during detail or total 
calculation. (See Special Note 1) 


The End of Diagnostics (#D#1) halt and the End of Generation 
(9333) halt may now be bypassed. (See Special Note 2) 


R11T users may now force an end-of~job condition by turning 
on the Last Record (LR) indicator during calculation 
(detail/total) time. (See Special Note 3) 


R11T now has the capability of adding records to a sequential 
disc file. Adding is accomplished by writing new records 
starting at the address currently occupied by the end of file 
mark. (See Special Note 4) 


The number of halt indicators permitted has been expanded from 
two to eight. (See Special Note 5) 7 
When processing a control stream which resides on disc, it is 
now possible to allow RPG specification cards to be inputted 
from the serial card reader as well as from the disc file 
containing the control stream. (See Special Note 9 for 
information concerning this new feature). 
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C. SOFTWARE RESTRICTIONS: 


1. 


When running a control stream from disc (SJCS option) that includes 
an RPG compilation, and the RPG source statements are embedded in the 
control stream, a processor abnormal stop will occur. 


Secondary input files must be specified before chained files. 


Unblocked Index Sequential Files must have embedded keys, i.e., 
there must be an entry in Columns 35-38 of the "F" card. 


Standard labels must be used on a tape containing tables to be 
loaded at object time. 


If the memory configuration is 24K, R11T cannot be linked at an 
address higher than 3B9%,_. If symbionts reside in memory with RPG, 
then this address must bé reduced by the size of the symbiont(s). 


D. SPECIAL NOTES: 


l. 


EXCEPTION OPERATION 


a. This operation permits object-—program output to one or more device 
types at any time during detail or total calculations. The function 
can be used in applications where: 


1. A number of identical records are to be transferred to an 
output device in one RPG cycle by repeatedly specifying EXCPT, 


2. A number of similar records are to be transferred to an output 
device in one RPG cycle. Those fields which are different 
may be modified for each output. They may also require 
calculation before the next record is placed on the output file. 
This can now be accomplished without having to repeat the 
specifications for the entire record. The exception lines 
function is of great advantage where a table with mathematically 
related entries is to be built. The object program can print, 
punch or write the table, one line at a time, within one RPG 
cycle. 


3. Repetitive calculations chaining and updating or adding of 
records of a file is required before the cycle for one input 
record has been completed. 


b. Execution of an EXCPT operation causes each record, designated with 
an E in column 15 and conditioned by indicators (if any), to be 
placed into its associated file. The order in which these records 
are described on the output-format specifications form determines 
the sequence in which the object program places them into their . 
output files. 


c. Overflow Indicators 


When an overflow condition is encountered, during the execution of 
exception output lines, the program sets the appropriate 

overflow indicator before it returns control to the calculation 
routines. Hence, either 'of' and/or 'OV' overflow indicators 

may be on when the program continues executing the remaining 
calculations. 
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ee 


Entries on the Calculation Specification Form 


For an exception line operation, the specifications on the 
calculation specifications form are as follows: 


Column Specification 
7-8 Control level indicator (optional) 
9-17 Any valid conditioning indicator 
28-32 The operation code EXCPT 


See Example 1. 


Entries on the Output-—Format Specification Form 


The only specification affected is the use of the letter E in 
column 15. This associates an output record with detail or 
total calculation time rather than detail or total output time. 
The specifications for all other columns remain the same. 


Error Displa EEE 


When the EXCPT operation is being performed, if both the 
EXCPT calculation specification and at least one output 
specification with an E in column 15 are not present, the 
'QEEE' error display will occur. Correct the program and 
restart. 


Restrictions 





l. 7-track tape files without data conversion (TAPE7) cannot be 
used as output files in an EXCPT operation. This restriction will 
be removed in a future release. 


2. Exception output records must be specified after total lines 
on the output-format specifications form. See Example 2. 


3. An overflow indicator cannot condition an exception-output line. 
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2. YDP1_ and 9333 Displays 


This version of the Report Program Generator now has the ability to 
by-pass the end of diagnostic (@D#1) and the end of generation 
(9333) displays. 


This feature is controlled by column 9 of the RPG header card. The 
codes for column 9 are as follows: 


blank - both X'ZD#1' and X'#333' will be by-passed. If the X'#333' 
message is not displayed, then execution of a program must 
be from the object module. 


D - only the end of diagnostic (X'@D#1') message will be 
displayed. 

E - only the end of generation (X'#333') message will be 
displayed. 

B - both the end of diagnostic (X'@#D#1') and the end of generation 


(X'9333') messages will be displayed. 
3. Last Record (LR) Indicator 


The LR indicator can now be SETON and SETOF during calculation 
(either detail or total) time. This feature permits the following: 


a. A program can be forced into an end-of~job condition. If a 
program is prematurely terminated and data remains in the 
control stream, then a X'41CF' will be displayed. 


Note: All files will have been closed prior to X'41CF'! 


b. When an end-of-job condition occurs, the LR indicator can be 
turned off during TOTAL CALCULATION time allowing the Lg 
loop (detail time) to be executed. It is then the responsibility 
of the user to return the job to normal termination by turning 
the LR indicator on again. 


In order to further clarify the changes to the Last Record (LR) 
indicator, a revised RPG cycle has been enclosed in this release, 
(See Figure 2-8) 


4. R11T now has the capability of adding records to an 8411/8414 
sequential disc file. Adding consists of the ability to start 
writing new records at the address currently occupied by the 
end of file mark rather than being forced to start an output 
file at the beginning. Two rules must be followed to add toa 
SAM file: 


a. An "A" must be specified in column 66 (File Addition) of the 
File Description card pertaining to the SAM file. 


b. Output specification cards with the “ADD" designation in 
columns 16-18 should not be used for SAM files. 
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6. 


The number of halt indicators permitted in an RPG program has been 
increased from two to eight (Hl through H8). The halt displays 
QEGF, GEFP and PEFF are no longer valid for R11T as of this release. 
H1-H8 halt indicators will now be displayed as follows: 


Hl = 9Beg 
H2 = 9B4g 
H3 = 9B29 
H4 = 9B1g 
H5 = gBg8 
H6 = PBg4 
H7 = 9gBg2 
H8 = $Bg1 


Each bit position in the right-most byte of the display represents 
a different halt indicator. 


BIT POSITION: g 1 2 3 4 5 6 7 
HALT INDICATOR: 1 2 3 4 5 6 7 8 


If more than one halt indicator is set at one time, the bits for 
the appropriate halt indicators will be OR'd together in the 
display. Therefore, for example, if halt indicators 1, 4, 7 and 
8 are set, the display will be 9B93. 


Linking 
IMPORTANT: The R11T linker deck is now set up for a 'GENERATE and GO' 


RPG with 3 disc PARAM areas, rather than with @ PARAM 
areas as in the past. 


a. The R11T linker deck, called LTDS is punched out as the last step 
of the system generation run. If it is desired to punch this 
link deck separately from system generation, the following 
Librarian run may be utilized: 


/ EXEC LIBS (or LIBSA or LIBS4) 
7 DATA C 

@ FIND /LTDS,,,PUNCH 

@INS 

/* REWIND 

J FINIS 


b. The linker statements for linking R11T are provided in the RPG 
linker deck. 


c. The RPG linker deck uses the asterisk convention. Thus, RLIT 
will be linked at the same location as the disc linker is linked, 


ad. The linker deck is set up for a 'GENERATE and GO' RPG with 
3 PARAM areas. If 3 PARAM areas are not desired, then changes 
must be made to the linked deck (refer to Special Note #8). 


Procedure for changing the 'GENERATE and GO' Report Program Generator. 


The purpose of a ‘GENERATE and GO' RPG is to allow the storing of disc 
or tape label information via PARAM cards prior to the generation of 
an object program. A parameter area of 26 bytes is required for 

each tape label (standard labels only; non-standard labels are not 
permitted) and 58 bytes for each disc label. It should be noted that 
this will decrease the memory remaining for the generation which in 
turn decreases the memory size for the object program correspondingly. 
This is wasteful for any object program which does not require the 
full number of PARAM areas. 
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To increase or decrease the size of the label areas, the following 
changes must be made to the R11T linker deck prior to Phase 2 
of the system disc generation. 


a. The PRGM which 


COL. 10 16 
specifies PRGM programname, *+936+174 
should be changed to PRGM programname, *+936+L 


where L is the number of labels times 26 and/or 58 


b. The EQU card which 


COL. 1 10 16 
specifies L EQU 174 
should be changed to L EQU n 


where n is the number of labels times 26 and/or 58 


c. Card #'s R11T0080 and R11T0090 (INCLUDE /PRMl1 and PRM2) are 
used to reserve the required number of bytes necessary for 
storing PARAM information. These modules reserve an area of 
174 bytes (58 bytes times 3). The following six modules are 
provided for use in conjunction with the PARAM areas: 


TAPE: 

LEN1 (reserves 26 bytes for 1 PARAM) 
LEN2 (reserves 52 bytes for 2 PARAM's) 
LEN4 (reserves 104 bytes for 4 PARAMts) 


DISC: 

PRM1 (reserves 58 bytes for 1 PARAM) 
PRM2 (reserves 116 bytes for 2 PARAM's) 
PRM4 (reserves 232 bytes for 4 PARAM's) 


By specifying different combinations of these modules, any number 
of PARAM areas (up to the permissible number of devices) may be 
reserved. 

EXAMPLE 


In the following example an installation requires 2 disc labels and 
1 tape label for a ‘GENERATE and GO' environment. 


a. The PRGM card which 


COL. 10 16 . 
specifies PRGM TPG1, *+936+174 
should be changed to PRGM TPG1, *+936+142 

b. The EQU card which 

COL. 1 10 16 
specifies L EQU 174 
should be changed to L EQU 142 
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dad. Linker Deck Changes 


The following is a list of the specific cards to be changed for 
either a zero PARAM Report Program Generator or a 'GENERATE and GO' 
Report Program Generator which requires less than or more than 

3 PARAM areas. 


PRGM cards 


R11T0200, 0280, 0490, 0900, 1630, 2850, 3140, 3280, 3500, 
3630, 3750, 3850, 3940, 4030, 4130, 4240, 4340, 4510, 
4610, 5030, 5190, 5900 


EQU_ cards 


R11T0030, 0210, 0290, 0500, 0910, 1640, 2860, 3150, 3290, 
3510, 3640, 3760, 3860, 3950, 4040, 4140, 4250, 4350, 
4520, 4620, 5040, 5200, 5910 


8. For additional information regarding PARAM areas, refer to 
UP-7620, Rev. 2. 


9. Reading RPG specification cards from the control stream 
card reader when processing a control stream which resides 


on disc. 


It is now possible to allow RPG source programs to be inputted from 
either the control stream card reader or from a disc file when 
processing a control stream which resides on disc. This is 
accomplished by placing a card with a slash in column 1, "DATA" in 
columns 10-13, and "READER" in columns 16-21 in the disc control 
‘stream at the point where a normal "DATA" statement would be located. 
The detection of this card by the Supervisor causes the next control 
stream image delivered to be the next image from the "real" control 
stream reader. For more information concerning the "DATA READER" 
option, see Appendix B, System Job Control Stream, page 6. 


A sample control stream to compile and execute an RPG program follows: 


LIBS Run to Create a Control Stream on Disc: 





/ EXEC LIBS 

/ DATA C 

V CTL N,W,@2,CNTLFILE 

V ELT COMPILE, * 

/ EXEC RI1I1T 

/ PARAM (DISC OR TAPE - the number of PARAM's allowed 
is governed by the size of the compiler's 
PARAM area) 

/ DATA READER » 

/ EXEC RUN1,@1,RPGOUTPT 

/ DATA READER 

/ FINIS 

/: 

/ * 

/ FINIS 
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Control Stream to Compile the RPG Programs: 


/ RUN COMPILE, #2, DNTFILE 

/ DATA C 
(RPG Source Cards to compile an object pgogram 
named RUN1) 


/ DATA Cc 
- input data to program just compiled 


/ FINIS 


NOTE: 


When compiling more than one RPG source program in succession via the 
control stream reader, the normal job control card sequence between 
the source programs is: ‘ 

/* 

/* 

/ DATA C 


If the DATA C card is.inadvertantly omitted, miskeypunched, etc., 
a processor abnormal will occur. This condition will be corrected 
in a future release. . 
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Figure 2-8. Operating Cycle Flowchart (Part 1 of 3) 
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APPENDIX E. 8411/8414 SORT MERGE 


Corrections: 


1. When processing the 'SORT' parameter, positional parameter 3, 
the option of (R) for retaining equal key fields and (D) for 
deleting equal key fields was not displaying an error halt X'10A2' 
and the DROC option in the 'OWNCD' parameter was used. The DROC 
option may only be used with (U) relocation code for handling equal 
key fields by own-code module. 


2. Correction made so the creation date of the OLB statement will be 
checked with the expiration date of the output tape or disc. 


3. Problem resolved to allow halt X'1026' to occur (INVALID BLOCKING 
FACTOR) if a one digit blocking factor was given. Results 
previously were unpredictable. 


4. The addresses referencing ILBF, ILBC, ILBG, ILBV, OLBF, OLBC, 
OLBG, OLBV, and OLBX labels between own-code and sort have been. 
corrected. 


5. Corrected problem where zoned decimal (Z) was specified in the 
field card. The results were that the field was being unpacked 
before sequence checked, result being a X'3003' stop (sequence error) 
for negative numbers. 


6. Residue was being lost when getting a record after a block of data 
was sorted internally. This would only occur for variable type 
records that had residue and ended at the maximum residue buffer 
address and the sort tried to write the residue before moving it into 
the residue buffer. 


7. An instruction labeled 'ROPE' was in an invalid position in the 
coding causing unpredictable errors when merging with own-code 
options. 


Enhancements: 


l. The DATE statement will no longer be required by the SORT/MERGE 
and all coding required to process the Date statement has been 
deleted. 


2. General housekeeping of deleting unreferenced coding and labels. 


Special Notes: 


1. If the number of records inputted to the sort does not equal the number of 
records outputted by the sort, a halt X'6EEE' will result. If "1" 
is keyed into location 4, the halt will be ignored. No keyin or any keyin 
other than 1 will cancel. 


2. To alleviate the problems caused by the restriction that only the 
last reel of tape input, in a multivolume blocked sort can have 
a short last block, OWNCODE IPRO (Input Processing) modules are 
being supplied. 


I?SL Standard Labels 
I?NS Non-standard Labels 
I2?NL Non-Labeled 
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Parameter cards are prepared the same as a conventional sort with the 


inclusion of an "OWNCD" card, (See Example 1 on page 3 of 3). Input — 
blocksizes cannot be larger than 1800 decimal bytes. For blocksizes 
900 bytes or less two I/O areas for faster inputting can be requested 
by specifying a "W" in positional parameter 11 of the "IN" card. 
(See Example). Halt X'39uu! will occur to signal that the next input 
reel should be mounted. Alternate input units can be specified. 
3. When specifying the memory size (16383, 24575, 32767) for the ‘SORT' 
statement and DUMP=RES is specified when the supervisor is generated, 
take into account the size of the resident dump (approximately 30019 bytes) 
and subtract it from the memory size. 
Software Restrictions: 
Permanent Restrictions: 
1. The first byte of an input record may not contain X'FF', ce 
2. The 'D' for deleting equal key fields may not be used in the 'SORT' 
parameter is OPRO (own-code) is used. The DROC own-code for data- 
reduction can not be used with OPRO. Manual change will be made to 
reflect above restrictions. 
NAH 
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LvT# owen 


IIOOE6/00E6/I10076/0076 


€ FOE 


a XIGNGddv 


/ EXEC PHASEZRO 
vs DATA T 
I?SL FOR STANDARD LABELS 
OWNCD { I?NS FOR NON-STANDARD TABELS} beeereees 
I?NL FOR NO LABELS 
DISCS (£@,SORTWRK1,9%1,SORTWRK1. 
ILB SORTOUT1, 69321, 9991,91. 
s 
IN S,SORTOUT1,#5,96,T,%3,19,908%,,,(W IF INPUT BLOCKSIZE 900 BYTES OR LESS),. 
(TWO I/O AREAS IF 'W' USED) 
ouUT 07,07,T,19,,,R. 
SORT  39999,R,R,,,D,N. 
FIELD CA@@@5905. 
END 
[* 
/ DATA C 
WND 9M SYSFILE 
a ci eric oe ag REPLACE WITH RELOCATABLE DECK 
?NS FOR NON-STANDARD LABELS} | +5 owscopz NOT ON DISC 
I?NL FOR NO LABELS | 
END 
/* 


EXAMPLE 


APPENDIX F. Implementation of DNCOS in 16-K memory. 


Under certain circumstances, it is possible to implement 8411/8414 DNCOS ona 
16-K machine. The discussion below is intended to be used for guidance of 
customers and UNIVAC personnel who may be considering such systems in the 
future. Any decision to attempt installing a 16~K DNCOS system should be 
made only after a thorough review of the needs of the particular installation 
and after assembly or compilation of "worst case" programs. 


1. SYSGEN Limitations. It is not possible to perform a system generation 
at a 16-K installation using the master discs supplied by UNIVAC. It is 
recommended that the generation be performed at another installation. 

If this is impossible, the following guidelines may be helpful: 


a. The elements on master disc #1 may be copied to another pack, 
replacing all loadable elements from "SUPR" through "LIBS4" with 
similar loadable elements from the 16-K site's system pack. Phase I 
and the linking of utilities may then be performed. 


b. The loadable R11T compiler from disc #1 may be copied to the pack 
containing other elements generated during Phase I. This compiler 
is linked at X'138f'. It is impossible to link a compiler from 
the relocatable elements supplied since the Linker does not have 
sufficient memory space in a 16-K machine to link the largest 
phase of the compiler. 


2. Generated Supervisor Size. While DNCOS has been operated successfully 
with previous Supervisors as large as X'129%', it is naturally desirable 
to generate the smallest possible Supervisor. The following should 
be noted to assist in accomplishing this: 


~- If the standard (#711) reader is used for the control stream, and 
if not more than three disc drives are specified by the UNT1 
parameter, and, 


-- If the highest logical unit number in the configuration is 19 
("CFGGA"), the size of the generated Supervisor will be less 
than X'1929. 


This will enable Dump/Restore to fit into memory with 64 (X'4M') bytes to 
spare. DPRS is the largest utility supplied with this DNCOS release. 
If the user wishes to save additional memory by using non-standard logical 
unit numbers (i.e., assign L.U. #3,4 and 5 to reader/printer/punch), it 
will be possible to keep Supervisor size below X'1@@@'. It is nota 
recommended practice to link programs immediately above the Supervisor 
as it cannot be predicted whether future changes to the Supervisor may 
cause it to increase in size. While Linker, Dump/Restore, and LIBS should 
be linked very low, it would probably be feasible to link an 
RPG compiler higher (or use the prelinked compiler to allow for 
possible future Supervisor expansion. : 

3. Programming Techniques. Needless to say, it is not possible to write 
as large a program for a 16-K machine as for a larger system. However, 
a certain amount of finesse will enable the user to squeeze surprisingly 
large programs into 16-K. Some general guidelines follow: 
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a. Keep block sizes within reason. For RPG programs which handle 
several files at a time, 500 bytes has been found to be a good 
rule of thumb. Where possible in Assembler programs, use the 
same work area to process records from various files. 


b. In RPG programs, make the maximum use possible of the asterisk 
enhancement where more than one line of code is governed by the 
same indicator(s). Use GOTO and TAG statements to branch around 
calculations that would involve many tests of indicators that 
could be avoided. 


c. In Assembler, make any initialization routines which are only used 
once overlayable by putting them in work areas (DS). 


d. In Assembler, where possible, use DIFCZ and DIFPZ in place of 
DIFCS and DTFPR (See Appendix G). 


e. Make GET/PUT/READ/WRITE transient for SAM and ISAM files wherever 
possible. While throughput may seem to suffer by repeated accesses 
to TRANSCYL, if transientizing all disc file processing functions 
is the only way to make the program fit into available memory, the 
throughput achieved will probably be much better than that obtained 
by breaking the program into separate programs and making multiple 
passes through the same files. 


£. SAM and ISAM processing have been mixed successfully in the same 
RPG programs but you will run out of memory much sooner with both 
types of processing in one program than with only one of the two. 


4. LIBS. In a 16-K machine, the only version of the Librarian which will 
fit into memory is one which is linked from the relocatable elements 
LIBS#1 or LIBS#2. If LIBSY2 is used, it must be linked no higher than 
X'1169' if it uses the serial punch; X'1g4f' if it uses the row punch. 


5. Tapes. It is extremely unlikely that a DNCOS system which included magnetic 
tapes would be functional in 16-K, even using the non-resident Tape 
Dispatcher. 


6. COBOL. The COBOL Compiler will barely fit into 24-K. There are no plans 
to make it operable in 16-K. However, there is nothing to prevent the 
compilation of COBOL programs on larger systems for use on 16-K machines. 
As in Assembler and RPG, much more finesse must be employed in a smaller 
memory size. 


7. The FORTRAN compiler can be used in 16-K but DATA and EQUIVALENCE 
statements are not accepted by the compiler. The use of large 
arrays should be avoided, where possible, to enable the generated 
program to fit. Since the largest part of any loadable FORTRAN program 
is usually the automatically-included library subroutines, it may be 
desirable to analyze the external references generated by the FORTRAN 
compiler to determine whether the number of library subroutines required* 
by the program can be reduced. It may also be necessary to employ 
segmentation (through CALL LOAD and CALL FETCH statements) to make a 
very large program fit into minimum memory. 


8. Linker. For the Linker to be operated in 16-K memory, it must be 
linked no higher than X'19Bg'. 
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9. Miscellaneous Sysgen Considerations: 


When linking the RPG compiler with the Supervisor and Linker which 

will be used on a 16-K system, it will be necessary to alter location 
E?TM (see Supervisor assembly listing) to reflect the memory size 

of the larger machine on which the linking is being done. (X'3F' should 
be changed to X'5F' or X'7F' after IPL but before executing the Linker. 
A PARAM R card could be inserted ahead of the EXEC DL11 card for this 
purpose.) 
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APPENDIX G. TRAN AND TRANSIENTS 


1. The following changes or improvements have been made to TRAN: 


a. When TRAN finishes writing out a track of system transients, it 
prints the number of bytes remaining on the track. Each time it 
writes out a user transient, it prints the number of bytes 
remaining on the track. This information may be useful to installations 
which maintain their own transients. 


b. TRAN always verifies that the transient it is about to write out will 
fit in the space remaining on the track. If it will not fit, 
X'74BB' is displayed and the job is cancelled. 


c. TRAN produces the following new halt displays: 


74EE — TRANSCYL cannot be located on the output unit. Press START to 
retry the search. 


74FF -— The relocatable module which was to be written out as a transient 
cannot be located on the input unit. Press START to retry the 
search. 


Each halt display is preceded by a self-explanatory printout. The 
locator/loader stops which TRAN formerly caused to occur are no 
longer given. The printed message includes the locator/loader 
stop that the Supervisor would have produced. 


d. When TRAN is asked to write out a user transient, if the "base address" 
is omitted from the input card (columns 34-37), TRAN will assign the 
address of the system transient area as the transient's base address. 


e. TRAN now prints, at the top of its printer output, the Volume Serial 
Number, device address, and logical unit number of the system-resident 
disc pack. 


2. There have been several additions to the UNIVAC-supplied system transients 
as well as changes in module names and track assignments. Therefore we are 
including herewith a complete list of transients along with such additional 
information as might be necessary to an installation which needs to replace 
standard transients with their own. 


I.D. Module Name Description 


PPL none Supervisor locator/loader routines. TRAN writes out 
the contents of the system transient area. At IPL 
time, this area contains these routines which were 
assembled as a part of the Supervisor. 

GPSG2 UQ?0PCL Inquiry IOCS OPEN and CLOSE routines. =. 

This transient is called from the resident portion 
of the inquiry IOCS generated by the DTFUQ macro. 
Necessary only in 0S-500 system with inquiry 
capabilities. 

P2S3 UQ?GTPT Same as 982, but contains inquiry IOCS GET, 

PUT and CNTRL routines. 
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Module Name 


SAM?0PN1 
S ?QCLOSE 


IS 2USETL 


IS 27MOPEN 


IS ?CLOSE 
RPGA??DD 


IS ?GETPT 
IS ?HIADD 
IS ?RDWRT 
S 2QTTGET 
S?2QTTPUT 


COM ?TRAN 


T ?PEOPEN 


T?PCLOSE 
T?PTTGET 
IS ?BADIN 


IS ?7UADIN 


IS ?BSETL 


T?2PTTPUT 
IS ?7INDEX 


DISC?IPL 


RPG ?WEC2 


RPGWED3 


RPG ?WECL 


Description 


Sequential access method (SAM) OPEN Part One. Called 
by SAM IOCS to OPEN sequential disc files. 

SAM CLOSE. Called by SAM IOCS to CLOSE sequential 
disc files. 

Indexed sequential access method (ISAM) unblocked SETL. 
Called by ISAM IOCS in response to issuance of 

SETL macro. 


ISAM OPEN. Called by ISAM IOCS to OPEN indexed 
sequential files. 

ISAM CLOSE. Called by ISAM IOCS to CLOSE ISAM files. 
ISAM ADD CCW generator. Called by RPG compiler to 
generate CCW chains for programs which will add to 
ISAM files. 


ISAM GET and PUT. Called by ISAM IOCS for sequential 
processing of ISAM files. 

ISAM add high. Called by ISAM IOCS to add records 
whose keys are higher than those existing in the file. 
ISAM READ and WRITE. Called by ISAM IOCS for random 
processing of ISAM files. 


SAM GET. Called by SAM IOCS in response to GET macro. 
SAM PUT. Called by SAM IOCS in response to PUT macro. 
Cannot process undefined or variable-length records. 
Communications routines. Called by Supervisor in 
response to SRC's 30, 32, 36 and 38 and also by 

"Comm Cleanup" (E?CU). 


Tape OPEN. Called by Magnetic Tape IOCS to OPEN 

tape files. 

Tape CLOSE. Called by Tape IOCS to CLOSE tape files. 
Tape GET. Called by Tape IOCS in response to GET macro. 


ISAM blocked add/insert. Called by ISAM IOCS to insert 
new records in ISAM files whose record format is 
blocked. 

ISAM unblocked add/insert. Same, but for unblocked 
records. 

ISAM blocked SETL. Same as 9193, but for blocked 
records. 


Tape PUT. Called by Tape IOCS in response to PUT macro. 
ISAM index-—in-memory. Called by ISAM IOCS as a 

part of OPEN processing to bring an ISAM file's 
cylinder indices into memory. 

Disc IPL block. Called by LIBS in response to a 

V BOOT command, This transient contains a copy of 

the standard 8411/8414 IPL block. 


Generation transient. Called by RPG compiler to open 
the library file to which the generated program will 
be written. 

Generation transient. Called by RPG compiler to 
write out the generated program. 

Generation transient. Called by RPG compiler to close 
the object file. 
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I.D. Module Name Description 

G91 RD? ?PRNT Printer/control stream transient. Called by IOCS 
routines generated by DIFPZ and DTFCZ. 

G9IG2 T 2PETRAN Transient tape dispatcher. The generation of this 


transient is an option at system generation time. 
It is only used if Supervisor and Job Control are 
generated with TTRN=YES specified. It is not 
loaded into the system transient area but into the 
area between the Supervisor and Job Control. Its 
size varies according to the options selected when 
generated. It is loaded into memory by Job Control 
when a program is to be executed which will use 
magnetic tape units, as defined in its program-i.d. 
record. 


GAZ1 FILE? File and Source Element Locator. Called by LIBS, 
COBOL, RPG, Job Control SJCS routine, and 
Cross Referencer to locate a library file and/or 
source element. 

PAg2 SAM?0PN2 SAM OPEN Part Two. Called by SAM?0PN1 to complete 
OPEN processing. 


GB1 ZSDISC FORTRAN disc OPEN. Called by FORTRAN Library routine 
Z?DS to open disc files used by FORTRAN-generated 
programs, 

GCP1 D?H?0PEN Direct access method (DAM) OPEN. Called by DAM IOCS 
to OPEN direct access files. 

gcg2 D?H?CLOS DAM CLOSE. Called by DAM IOCS to CLOSE DAM files. 

gCe3 D?H ?2KEY DAM Key processing. Called by DAM IOCS to perform 
Key processing as a transient. 

GCg4 D?H?ID DAM ID processing. Called by DAM IOCS to perform 
ID processing as a transient. 

gcegs D?H?AFTR DAM AFTR processing. Called by DAM IOCS to perform 
AFTR processing as a transient. 

CPE D?H?IORG DAM IORG processing. Called by DAM IOCS to perform 


IORG processing as a transient. 


DP1 FAST ?LDR Fast locator/loader routines. Called by Supervisor 
to locate and load programs in the system execution 
area (SYSEXAR). 

PDS2 RIRO?TRN Roli-in/roll-out transient. Called by O0S-500 
Supervisor in response to an inquiry request when it 
is necessary to roll out the main program prior to 
searching for an inquiry program. Called again by 
the Supervisor to roll in the main program after the 
inquiry request has been processed. 

YDP3 PARAM? PARAM card processing. Called by loader to verify 
PARAM cards and apply patches contained therein to the 
program about to be executed. In O0S-500° system, if 
Job Control was generated with CLOG=ALL specified, 
PARAM? prints PARAM cards on the system console. If 
the current control stream is on disc, PARAM? causes a 
return to the card reader if it detects a 
"7 DATA READER" statement. 


3. The following information is provided concerning the bar printer and control 
stream reader transient IOCS macros, DIFPZ and DIFC4Z respectively: 


a. DIFCZ is a macro which generates the resident shell of a control stream 
reader routine. Users who program in assembler language may call DTFCZ 
in place of DTFCS in order to save approximately 270 bytes. DTFCZ has 
one key-word parameter, EOFA, whose meaning is identical with the EOFA 
parameter in DTFCS. Consult the current edition of Operating System IOCS 
(UP-7526) for information concerning DIFCS. 
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b. DITFPZ is a macro which generates the resident shell of an IOCS routine 
for the bar printer. Users who program in assembler language may call 
DIFPZ in place of DTFPR in order to save approximately 500 bytes. 
DTFPZ has the following keyword parameters: 


BKSZ, CNTL, DEVA, FONT, OTBL, PRAD, PROV 


The meanings of all parameters are identical with those of the same 
parameters in the DIFPR macro. UP-7526 also contains complete 
information on DIFPR. DTFPZ has no buffered print capabilities. 


c. Either or both macros may be called within an assembler language 
program or may be used to produce relocatable elements which can be 
linked to a main program. The user must provide START and USING 
statements in either case, just as he would do with DIFCS and DIFPR. 


d. The routines which are generated by the DTFCZ and DIFPZ macros call 
in a standard system transient, RD??PRNT which occupies Head 9, Record 1. 


e. Although the use of these IOCS routines, like that of any other 
routines that use transients, will result in a savings of main program 
size, the same considerations of program size vs. throughput apply. 
A program which does a large amount of printing and card reading and 
which also uses Tape and Disc IOCS transients heavily would be slowed 
down noticeably by having to load a new transient each time a card 
was to be read or a line printed. A program which used other transients 
only for opening and closing tape and disc files would not be slowed 
at all by transientizing reader/printer functions. 


£. A program which requires both the control stream reader and the bar 
printer need not transientize both functions. The "standard" macro 
could be used to generate the IOCS routine for the high volume file 
and the new macro for the low volume file. (DTFCS plus DIFPZ, or 
DTFCZ plus DIFPR). 


g. Modules produced by these new macros are supplied for linking to all 
UNIVAC-supplied utilities and language processors, except for the 
RPG and COBOL compilers, whose reader/printer routines are internal, 
and TRAN, which must be able to operate in the absence of any 
transients. 


4. The following information is included in this release memo in response to 
many questions received in Blue Bell concerning TRAN and transients. It is 
hoped that it will clear up any misconceptions that might exist on the 
subject. 


O= Why is it necessary to run TRAN with one Supervisor as opposed to another? 


A - When TRAN is asked to write out system transients, it ascertains the 
address of the system transient area. It then locates each relocatable 
element whose program-i.d. is on a list which is within TRAN itself.. 
The relocatable addresses within each element are converted to 
absolute addresses which are dependent on the location of the system 
transient area. The element is then written to TRANSCYL as a single 
block. If the contents of TRANSCYL are then copied to a pack which 
contains a different Supervisor, or if the Supervisor under whose control. 
TRANSCYL was written is replaced, the transients will not function 
correctly if the Supervisor with which they are now used has a system 
transient area at a different location. 
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Q - How can we ensure that we have the "right" transients on a given pack? 


A - One of the recent improvements to TRAN was the addition of a header line 
which contains the VSN, LU, and device address of the pack from which the 
Supervisor was booted. This should be checked to insure you booted 
from the right disc unit. Also, Job Control checks TRANSCYL each time 
it (JBCN) is loaded to see if it can read the Locator/Loader Transient 
and to compare an address constant within that transient against the 
address of the system transient area. If the transient is unreadable 
or the address does not match, a X'41C#' display is given. This display 
may be expected when a newly-created system pack is booted; if it occurs 
under any other circumstances, it indicates that TRANSCYL is unusable 
and should be rewritten. 


Q - Why can't we copy TRANSCYL with LIBS? 


A - TRANSCYL is not a library file. LIBS can process only those files 
which are in library format, i.e. two extents and 160-byte blocksize,. 


Q - If TRANSCYL is not a library file, how can we copy our transients to a 
new system pack? 


A - We recommend the use of the Dump/Restore Utility (DPRS). Use the file-to- 
file dump feature. TRANSCYL may even be located on different cylinder (s) 
on the new pack. It only takes a few seconds for DPRS to copy a file 
as small as TRANSCYL from pack to pack. If tape units are available, 
TRANSCYL may be dumped to tape along with other files for backup 
purposes. A procedure which would be more time-consuming and disc 
space-consuming would be to preserve all the relocatable transient elements 
from the release disc/tape and rerun TRAN each time you create a new 
system pack. 


Q - If we use the Transient Tape Dispatcher feature, can we still use the 
Tape IOCS transients? Do we have to use them? 


A - There is no relationship between the use of the Transient Tape Dispatcher 
and the use or non-use of Tape IOCS transients. Tape IOCS transients are 
loaded into the system transient area; the Transient Tape Dispatcher is 
loaded into the area between the Supervisor and Job Control. The 
Transient Tape Dispatcher remains in memory until Job Control is 
recalled by the CANCL or EOJ macro. It is reloaded by Job Control 
each time a program is to be executed which needs tape drives. 


Q - If we are using the Transient Tape Dispatcher, do we have to link our 
compilers high enough so it won't conflict with them? 


A - If you link anything that doesn't use tapes during its own execution 
at an address above the Transient Tape Dispatcher, you are defeating 
the purpose of generating and using this feature. R11T, KSMB, DLI11, 
and FORTRAN do not use tapes; COBOL can read its source from tape but 
if you linked the COBOL compiler at the higher of the two possible 
link addresses, you would then have to ask it to produce relocatable 
code for programs that did not use tapes so that you could link them 
at the lower address. The Transient Tape Dispatcher feature was 
designed for those installations whose use of tapes is intermittent 
or limited to a small number of programs or application areas. If 
you use the feature, you must take extra steps (providing UNITS cards, 
specifying higher base addresses, generating relocatable code) to 
create a small number of programs. If you find that you are taking 
those extra steps for too many programs, you may wish to regenerate 
your system without this feature. 
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Q - If we want to put our own transients on TRANSCYL for loading via 
SRC 44, how do we get them onto TRANSCYL? And where? 


A - See paragraph 2 above for a list and description of all UNIVAC-supplied 
transients. You may see several transients whose functions are 
unnecessary in your system, e.g. a configuration that doesn't include 
magnetic tape units doesn't need the "T?" transients. You may wish to 
"deceive" TRAN by giving your own transients the names of unnecessary 
transients, then replacing the UNIVAC-supplied transients with your 
own in the library file which is input to TRAN. Another approach would 
be to let TRAN write out all UNIVAC-supplied transients, then overlay 
our transients with yours by telling TRAN to write out specific 
transients. It must be remembered that the writing of a new transient 
causes the erasure of any other transients on the same track which 
have the same, or higher, i.d. For instance, if you overlaid 
RIRO?TRN (i.d. JD#2) with your own transient, you would then have to 
rewrite PARAM? (i.d. @D#3) since the latter transient is used for 
processing PARAM cards. 8414 users may wish to take advantage of their 
greater track capacity to write their own transients after UNIVAC-supplied 
transients on each track. 


Q - What is the difference between a "Standard" or "system" transient and 
a “user" transient? 


A - To the Supervisor, a "user" transient is any transient which is called for 
by an SRC 46. This kind of transient may be loaded from any cylinder, 
including TRANSCYL, and into any memory location, including the system 
transient area. This feature is only available if UTRN=YES was 
specified when the Supervisor was generated. Any transient which is 
called by the SRC 44 is considered a "standard" transient and must 
be loaded from TRANSCYL into the system transient area (tag UT?? on A 
Supervisor assembly listing). 


To TRAN, a "standard" transient is any transient which is to be 

written out in response to an input card which has a blank in. column 

16. When TRAN reads such a card, it writes out, either to TRANSCYL 

or to a user-specified cylinder, all elements which appear on a 

predetermined list. To TRAN, a "user" transient is any element whose 

name appears in columns 16 to 23 of an input card. This element may 

or may not also appear in TRAN's list of "standard" transients; it 

may or may not be written to TRANSCYL. TRAN makes no attempt to 

verify whether the user-specified output cylinder is assigned to a 
file or to examine its contents. 


Q - Do we have to reassemble or recompile all our programs every time 
a new DNCOS release comes out? 


A - Reassembly or recompilation should only be done if necessitated by some 
correction or improvement announced in the release memo. In general,- 
old programs (i.e. which contain previous levels of IOCS routines) can 
be run with new transients since every effort is made to avoid making 
changes to transients which force reassembly or recompilation of user 
programs. However, you should not attempt to use new programs 
(i.e. with resident IOCS routines from the new release) with transients 
issued with previous releases. 
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APPENDIX H. SUPERVISOR AND JOB CONTROL 


SUPERVISOR 
For changes which affect only OS-—500 users, See Appendix M (0S-500). 
The following enhancements have been made: 


1. The restriction on the use of the System Job Control Stream feature where 
the Control Stream Reader is the 1004 reader has been lifted. 


2. It is now possible, while processing a control stream from disc, to return 
to the "read" reader for control stream data input. See Appendix B (SJCS) 
for details. 


3. The size of the system transient area has been reduced to X'52f' (1212 oH 
bytes for all systems except for certain OS-500 systems (see Appendix Mm?) 
This reduction in size will result in a smaller Supervisor for most 
configurations. 


4. All processing of PARAM cards is now done in the transient PARAM?. This 
transient verifies the content of each PARAM card and produces the 
following halts in error situations: 


41CA - In a "normal" PARAM card, commas did not appear between relative 
location and length or between length and inserted data. Ina 
PARAM R card, commas did not appear between each two bytes of 
patch material or the patches did not terminate with a blank 
column. 


41CB - The address at which data would be inserted by either kind of 
PARAM card is within restricted memory (less than X'@#4g%'), higher 
than highest address as defined in boundary table, or ina 
PARAM R card is odd. 


41CC - A character other than a valid hexadecimal digit was read where 
only hexadecimal digits #@ through F were expected. 


After halt, the reader may be cleared and a corrected card placed in the 
hopper to resume processing. If the control stream is being read from disc, 
pressing START will cause the next image in the system job control stream 
file to be made available. 


5. The ability to use PARAM R cards is now a standard feature in all 
8411/8414-resident systems. Since all PARAM processing is done by a 
transient, this feature is available at no extra cost in Supervisor 
memory size. The REP parameter no longer needs to be specified to obtain 
PARAM R capability and has no affect on Supervisor generation. 


6. The disc dispatcher formerly produced 69u4 stops for command reject or 
invalid command errors as well as for a track overrun. The two situations 
are now distinguished from one another by providing a 69u5 stop for an 
invalid command or command reject. 


7. The disc dispatcher sometimes returned an incorrect address in bytes 2-3 of 
the disc request packet or failed to switch tracks properly when a 
multitrack read or search chain encountered a correctly-flagged defective 
track at the end of a cylinder. This discrepancy has been corrected. 


8. The Supervisor locator routines are used by Job Control and TRAN to locate 
files and/or elements. This sometimes resulted in misleading 4@xx or 14xx 
halts. Options have been incorporated into the locator to return control to 
the calling program when such errors occur. See TRAN and JBCN information 
elsewhere in this release memo for information concerning new halts. 
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JOB_ CONTROL 
For changes which affect only OS-500 users, see Appendix M. 
The following enhancements have been made: 


1. At IPL time, if the system resident disc pack does not contain a file named 
TRANSCYL, Job Control will produce a 41Cl display. If START is pressed, 
the locator error message is given which describes the reason for 
the failure to locate TRANSCYL (i.e. 14xx or 4fxx). This error is 
unrecoverable, except by running DASM under another Supervisor to allocate 
TRANSCYL, then rebooting from the pack on which the error occurred. 


2. Each time Job Control is loaded, it reads the beginning of the 
locator/loader transient to compare an address constant against the 
address of the system transient area which is available at location 
X'G156'. If a read error occurs or if the address is not correct, 

a 41C% display is given. If START is pressed, Job Control will begin 
processing the control stream. The halt is to be expected when 
booting a newly-created system. If it occurs at any other time, 

it indicates that TRANSCYL is unusable and that TRAN should be 
re-executed. 


3. The CSR keyword has been deleted from those keywords which may be 
specified when generating Job Control. 


4. Job Control now resets the interrupt and SRC table entries of all 
devices (other than tape, disc and 1004) which were allocated to 
.@ main program. This prevents possible errors caused by attention 
interrupts from devices such as paper tape units and 0716 readers. 


5. When Job Control is in a FINIS loop and job cancellation takes place 
through X'Ff%' keyin or through CANCL macro issued within the Supervisor 
or a symbiont, Job Control is reloaded but does not attempt to restart 
the control stream. Control stream restart is accomplished only through 
the X'E@' keyin. 


6. An error in Job Control's cancel routine has been corrected which 
formerly caused a PROC ABN if a DVCDN or DVCUP card was encountered 
after cancellation. 


7. #‘The routine which scans the operands of a Job Control statement has 
been corrected to accept a maximum of eight characters per operand. 


8. See other Appendices of this release memo for descriptions of .the 
NOTE and VOL statements, SKIP statement enhancements, and the 
implementation of the System Execution Area. 


WARNING: 


The Supervisor and Job Control Procs distributed with this release are for 
use in generating an 8411/8414-resident system and have not been tested as 
tape-resident or 8410-resident systems. Any use of the Procs to generate 
such systems is at the programmer's own risk. 
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APPENDIX I. 8411/8414 Disc Assembler (KSMB) 


A. Enhancements 


ISEQ directive can now be placed anywhere in the source statements 
and will sequence check till End record. 


1. New Instructions. 
a. Macro Definition Exit (MEXIT) 
The macro definition exit (MEXIT) statement may be used only 
within a macro definition that is written in Macro format. 
This statement indicates to the assembler that the processing 
of a macro definition should be terminated before ending 
normally with an END statement. 


The format of the MEXIT statement is: 


Label Operation Operand 
unused MEXIT unused 


When MEXIT is used, the assembler terminates processing the 
macro definition and processes the statement in the source 
program following the macro call instruction that called the 
macro definitions containing MEXIT,. 


b. PNOTE Message Statement (PNOTE) i 


i 
1 
i 
i 
} 
i 


The PNOTE statement may be used to generate comments or 
error messages on the printer listing and may be used ina 
macro or at the source code level. 


The format of the PNOTE statement is: 





Label Operation Operand 
unused PNOTE * or 'E', 'c! 
where: 


* indicates an asterisk to be printed in the error flag field 
'E' is an error character string enclosed in apostrophes 
'C' is a comments character string enclosed in apostrophes 


The PNOTE statement indicates to the assembler that a comment i 
line is to be generated in the output listing. ! 


c. Conditional branch (IF) 


The conditional branch (IF) statement conditionally alters the 
sequence of source statement processing. 


The format is: 


4 
i 
i 
3 


Label Operation Operand 
symbol IF e,S, 
where: 





symbol is a sequence symbol 
e is a logical expression 


5, any symbol which is a LABEL directive 
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RWNH 


PWN 


If, after the logical expression has been evaluated, the 
condition is true (a value of 1), you branch to the LABEL 
directive that is specified by the symbol in the operand. 
If the condition is false (a value of 9), the statement 

in the source code following the IF statement is permitted. 


Example: 

1 10 16 

Label Operation Operand 

TEST IF (&SIZE>19) , JOHN 
MNOTE 'INVALID LENGTH! 
MEXIT 

JOHN LABEL 


If the value of &SIZE(1) is greater than ten, the next 
statement to be processed is JOHN. 


Caution must be taken when specifying the LABEL if outside 
a DO and ENDO nest. 


MNOTE Message Statement is: 


Label Operation Operand 


unused MNOTE tm! 
,'m! 
s,'m' 

where: 


'm' is a message enclosed in quotes. 


s is a severity code. (The severity code is for compatibility 
only and is ignored by the assembler). 


When MNOTE is used, the assembler processes the message in the 
operand field of the source code statement excluding the 
enclosing apostrophies. 


Example: 
1 10 16 
Label Operation Operand 
DO CHNL=9% 
MNOTE "CHANNEL IS MISSING!!! 
MEXIT 
ENDO 


If the DO directive statement is true, MNOTE will be generated 
and the MEXIT operation then causes the assembler to terminate 
the macro definition. 


Macro Instruction (OPR) 


Problem programs can issue messages that are printed on the 
system console with the option of allowing replies from the 
operator. Assembler will now handle this macro instruction. 


See 0S-500, Appendix M. 
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2. A special form of the comments statement is also available. 
This form is used to include comments that are not to be 
generated in the output listing. This type is written with 
a period in Col. 1 of the assembler coding form, followed 
by an asterisk (*) in Col. 2, followed by the comment. 


Example: 


-* This is an internal comment, not printed. 


3. If the remainder of characters to be generated from a 'DC' constant, 
which contains more than eight characters and the eighth character is 
identical to the remainder of data, they will not be printed. To have 
the remaining characters printed, the PRINT directive must be used. The 
option must be ON; ON,GEN; or ON,NOGEN. 


B. Corrections: 


1. Change made to allow the disc assembler to end on a system type 
record (5500) if the END statement is missing when processing 
source from disc. 


2. The disc assembler will now flag an error if the second operand 
of the READ, WRITE, and SETL macro instruction is missing. 


3. Symbol table was being overlayed when using the restart print option 
causing a PROC ABN. Problem was corrected. 


4. Previous changes for resolving problems when processing 'DC' 
constants caused the length attribute (L') to be incorrect 
and flag as an error. This situation has been corrected. 


5. If the lst character of a label is numeric it will not be flagged 
aS an error as stated in previous release. Documentation will 
be corrected to reflect this situation, 


6. Previous problem with ISEQ has been corrected. Line number 
was not being assigned to last Proc Parameter. 


C. Special Restriction 


A problem exists when literals are used in programs cansisting of 
DSECTS. To avoid unpredictahle results, it is suggested 

that the LTORG statement be used whenever literals are present, 

until this problem is resolved. 


NOTE: 

The number of CSECTS and DSECTS that can be assembled is limited to 
an area consisting of 10019 bytes. Formatted: (L, ESID, LABEL) 

1 byte for length of label (L), 1 byte for ESID, and the label. 
Maximum value being 10 bytes (with an 8 byte label). Maximum number 
of combinations of CSECTS and DSECTS with 1 character labels would 
be 33. This area is variable depending on the label length and 

the number of CSECTS and DSECTS. 
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APPENDIX J. 8411/8414 Disc Linker (DL1)) 


Enhancement 


Ability to have optional information in the comments field of the output 
ELT record. 


a. If a comment is specified in the PRGM linker statement up to 21 
characters will be placed into the comments field of the ELT Record. 
The remaining characters will be truncated, 

b. If no comment is specified in the PRGM linker statement, the 
Supervisor date (Loc. 28010-28219) will be placed in the comments 
field of the ELT record. 

c. If a comment is specified in the PRGM linker statement and the 
supervisor date is requested to show in the comments field of the 
ELT record, the following Parameter must be used: 

/ PARAM 0001,01, 2 

This will place the date left justified in the comments field of the 
ELT record and allow a space, then up to 14 characters of the PRGM 
statement comment will be placed in the remainder of the comment field 
in the ELT record. The remaining characters will be truncated. 

If the suppress print option is required also, the parameter is: 


/ PARAM 0001,01,3 


EXAMPLES : 
1) PRGM TEST, * THIS IS A COMMENT TEST 


The above linker statement will result in the ELT record's comment 
field to look as follows: 


LOC. BYTE 60=THIS IS A COMMENT TES 
2) PRGM TEST, * 


The above linker statement will result in the ELT record's comment 
field to look as follows if the / DATE '031075' was in job stream: 


LOC. BYTE 60=031075 


3) / DATE '031075! 
/ EXEC DLI11 
/ PARAM 0001,01,2 
/ DATA Cc 
CTL N,W,...ETC 
PRGM TEST, * THIS IS A COMMENT 


The above linker statements will result in the ELT record's comment 
field to look as follows: 


LOC. BYTE 60=031075 THIS IS A COMM 
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Corrections: 


1. 


Made the "flags" feature operative so that auto-inclusion will work 
correctly with the Rev. 8.@ FORTRAN library, and as documented in the 
Tape/Disc Assembler manual, If the linker is doing a library search 
for automatic inclusion of relocatable elements, it will look at an 
element in the relocatable library only if it 

(a) has NO flags OR 

(b) has identical flags to those specified in the PRGM card. 

If no flags were specified in the PRGM card, elements containing any 
flags will not be considered for automatic inclusion. 


Corrected the linker's test for valid L.U. # in a command to test for 


no greater than 63 (X'3F') instead of 87. Highest l.u.# permissible 
with our LUPU proc is 63. 


NOTE: 


At least two blanks must follow the last positional option of the 
linker (PRGM CHAIN, or SYMB) statement before a comment is given. 
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APPENDIX K. LIBRARIAN (LIBS) 


A. 


The following enhancements have been made: 


1. In a disc-tape LIBS all tape units except those allocated to a 
symbiont will be accessible for I/O activity in a LIBS run. 


2. When "TAB" is specified in a LIBS command, a check is now made 
on the special comments card (the card has a ".*" in cols. 1 and 2) 
of a source module. This card will not be formatted. 


The following correction has been made: 

When relocatable elements are to be changed via the DATA command card, 

if no ESID is specified in Positional Parameter 2, an ESID of 1 will 

be assumed. 

LINKING PROCEDURES : 

With this release, six (6) different relocatable elements are supplied, 
any one of which may be used as the main LIBS program. Users who wish 

to link more than one version of LIBS may rename the different loadable 


versions in order to distinguish between them on the same system disc. 


The following table indicates the relocatable elements available: 


ELTNAME CALLS 

LIBS#1 DISC=8411,CTL=YES 

LIBS#2 DISC=8411,CTL=YES, PUNCH=YES 

LIBS#3 DISC=8411,CTL=YES, PUNCH=YES, SEQ=YES,TAB=YES 
LIBS#5 as LIBS#1, plus TAPE=YES 

LIBS#6 as LIBS#2, plus TAPE=YES 

LIBS#7 as LIBS#3, plus TAPE=YES 


The new LIBS update (UP-8028-A) should be consulted for detailed 
information on the parameters which may be used to generate the main 
librarian program. 


The linker statements for linking a version of LIBS using LIBS#2 are 
provided in the utilities linker deck, CDS. A different version of 

LIBS may be produced by substituting LIBSxx for LIBS#2 in this link deck. 
If LIBS#5 through LIBS#7 is included, the following statement must be 
inserted after "INCLUDE /1I011": 


INCLUDE /IOTP 


If LIBSZ1 or LIBS#5 is included, the "INCLUDE /PCH" and “INCLUDE /TBPU" 
statements should be removed from the linker deck. 


Users may substitute PCW (for row punch) or PCH4 (for 1994 punch) for PCH 
when linking a LIBS which will include punched output capabilities. 

LIBS does not open the punch IOCS routine which is linked to it unless 

an input statement requests the punching of a module, 


NOTE: The IPL equate card is no longer necessary in the linking of the 
various LIBS versions. 
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D. SOFTWARE RESTRICTIONS: 


1. It is likely that versions of LIBS which include all possible options 
may not fit into available memory when linked. This is especially 
true in 16K system, or when a large COS supervisor is generated 
and the user customarily keeps one or more symbionts resident. 

The linker map should be consulted to determine the size of the 
linked librarian. 


2. The following are known problems: 


a. Punching of more than one element with the COPY or CHANGE command 
results in the loss of ELT records after the first element. 


b. Sequencing of source code of more than one element with the 
COPY or CHANGE command results in the resequencing of all 
modules preceding and including the element. 


E. A X'28' will be 'OR'd' onto the UPSI byte by LIBS if an error occurs 
during its execution. 


NOTE: These LIBS elements (LIBS#4, LIBS#8, and XLIBS) are no longer 
supplied as of this release. These were elements which included 
the cross-referencing feature. The cross-referencing feature has 
been deleted from LIBS. See Appendix Q for the new disc cross-— 
reference utility; and Appendix P for the new tape cross-reference 
utility. 


F. Consult the TAPE DISC LIBRARIAN manual UP~8028-A for new features and 
updates specified in the command card. 


G. ATFTENTION: 


It is not recommended to use "BOG" records in a library run with the 
same name. 
EXAMPLE: BOG 
BOG 
BOG 


CAWY 


* 


<1<1<0401404044000409040.009 


8 
q 
es 


/* 


* It is suggested you do not use the same name for two (or more) 
different groups. 
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_ APPENDIX J, . MISCELLANEOUS IOCS,. 


The corrections and improvements described below have been made to the IOCS 
routines indicated therein. 


1. Control Stream Reader (DTFCS). 


a. The HSRB parameter has been eliminated. 


b. Corrected failure to issue 41FD and 41FE messages as expecting a 
reply; this made recovery from these messages impossible in OS-—500. 


c. Corrected failure of DIFCS to initialize the control stream when the 
program being executed was loaded through the control stream reader 
(/* in columns 16-17 of EXEC card); this led to unnecessary 41FE 
and 41CF stops. 


2. Serial Read/Punch (DIFRP). 


Corrected undefined flags caused when generating DIFRP for combined files. 


3. 1004 Printer (DTF4pP) 


Corrected 1004 printer's IOCS hanging the system when form overflow 
occurred and DTF4P was generated with CNTL=YES and PROV omitted. 


4. Printer/Control Stream Transient (RD??PRNT). 


This transient's handling of printer delayed error recovery procedures 
in an O0S-500 environment is now identical with that of DITFPR. The printer 
is now always restarted with a X'D3' keyin under OS-—500. 


5. Row Punch (DIFRW). 


a. When the row punch IOCS issued a 6491 or 64@F MSG, a reply was not 
required; in an 0S-500 environment, this caused the system to loop, 
printing out the same MSG. A reply is now required to each of 
these displays. 


b. Corrected the possibility of PROC ABN occuring if the row punch IOCS 
was opened and closed without any intervening PUT taking place. 


6. When generating the Disc-to-Bar printer symbiont (with parameter BAR=YES) 
and parameter CHNL=n and SYMB=n are omitted, they received the values 
CHNL=% and SYMB=%. Corrected problem to have a default of CHNL=3 and SYMB=3. 


When generating the Disc-—to-Drum printer symbiont the CHNL=n must be 
specified. The SYMB has a default value of 3. * 
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APPENDIX M.  OS-500 


This Appendix describes features of this software release that are of interest 
only to 0S-500 users. In OS-500 areas, few bugs remained to be corrected and 
emphasis has therefore been given to making the software more efficient and 
easier to use. While it will probably be necessary for you to reassemble many 
of your inquiry programs to operate under DNCOS 5.9%, we believe that the 
benefits realized from upgrading will more than compensate for the time 

spent reassembling. 


1. New Supervisor Generation Options. 


a. ROLL - To generate a system which is capable of rolling out the main 
("batch") job to process inquiries, ROLL=YES is now specified. 
Roll-out always takes place to the system resident unit; the ROLU parameter 
has been deleted. If the ROLL parameter is omitted, the roll-out 
capability is not generated. 


b. STATE - Formerly, the main job could only be suspended during the 
execution of a program for which a "PARAM S" card was used or during 
the Job Control FINIS loop. You now have the option of defining, at 
system generation time, whether the normal state of your system is to 
be suspendible or non-suspendible. If STATE=NOSUSP is specified, 
the suspendibility of the system is as before. If STATE=SUSP is 
specified, or if the STATE parameter is omitted, the system is always 
suspendible except when a program is being executed for which a 
"PARAM N" card is submitted. 


c. INQPL —- When a request was received to activate a program which was not 
resident, the requested program was searched for in SYSFILE on the 
system resident unit. This was often inconvenient because SYSFILE 
would contain numerous other elements and in any event was slow 
because of the many disc accesses required for locating and loading 
programs from library files. For these reasons, we have implemented 
the System Execution Area (SYSEXAR) specifically for loading of 
inquiry or other often-used programs. If the O0S-500 Supervisor is 
generated with ROLL=YES specified, inquiry programs will be "rolled in" 
by the fast loader unless INQPL=BOTH or INQPL=SLOW is specified. 

The former implies that inquiry programs are to be searched for 

first in SYSEXAR by the fast loader, then in SYSFILE by the slow 
loader. The specification of INQPL=SLOW keeps the loading of 
non-resident inquiry programs as is, i.e. from SYSFILE. We strongly 
recommend use of the fast loader (INQPL omitted or INQPL=FAST) and have 
included the other options only to facilitate conversion. Response 
time has been found to decrease from 5-10 seconds to 1-3 seconds. 

Of course, the amount of time the batch job is suspended is also 
dependent on the processing and disc accesses performed by the 

inquiry program once it is loaded. 


2. Roll-in/Roll-out. = 


As noted in la. above, roll-out is now done on the system resident unit. We 
believe that this is safer than specifying a logical unit since any swaps 
which occurred during the course of a run would cause roll-out toa 
different disc pack with possibly disastrous results. The following 
additional changes have been made to OS-500's roll-out philosophy: 
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a. The main job is no longer rolled out to an arbitrarily-chosen cylinder, 
but to a file whose i.d. is "ROLLOUT", This file may be located 
wherever desired by the user, but we recommend keeping it close to 
TRANSCYL, SYSEXAR and SYSFILE in order to keep arm movement to a 
minimum, ROLLOUT must be cylinder-aligned. The first track of 
ROLLOUT is used for rolling out the transient area and miscellaneous 
Supervisor tables. Enough additional tracks must be allocated 
to ROLLOUT to permit rolling out the entire area from beginning of 
physical unit tables to the top of memory. (In a concurrent system, 
the area occupied by symbionts is not rolled out, but the disc 


space must exist in case no symbionts are present when an inquiry 
is received.) 


b. ROLLOUT is now pre-formatted by Job Control each time the system is 
booted. This is done to permit faster roll-out and roll-in. 
Job Control also ensures that sufficient tracks were allocated to the 
file to permit rolling out the largest possible main job. Job Control 
is aware of whether the system was booted from 8411 or 8414 and takes 
advantage of the larger 8414 track capacity; formerly OS-500 rolled 
out only 3625 bytes per track. 


c. If no file named ROLLOUT has been allocated and a request is 
received to activate a non-resident program, the inquiring station 
receives an INQUIRY-ABORTED response. 


3. Inquiry Program Activation. 


a. The former requirement of typing "//RUN,", plus a 7-character 
program-i.d., was found to be slow and cumbersome. Those who wish 
to do so may still type "//RUN," preceding the desired program-i.d., 
but its use is now optional. In an OS-500 system that has inquiry Nd 
capability any unsolicited type-in that does not begin with a slash 
is taken to be a request to activate a program. The program-i.d. may 
consist of from one to eight characters. If the program to be 
activated is a single-inquiry mode program, the program-i.d. must 
be followed by a comma which in turn is followed by the input data. 


Example: 
PERS, JOHN JONES 


would activate a program named PERS, with "JOHN JONES" being the input 
data to that program. 


If the 0S-500 monitor scans more than eight characters without 
encountering either a blank or comma, a REJECT-~INPUT message is sent. 

The i.d. typed in must match, character-—for-character, the name used 
when linking or compiling the program, i.e. "old" programs which 

had M or S appended to their names can be activated by the new Supervisor 
only if all eight characters are typed in. 


b. When an inquiry was received for a non-resident program, the O0S~—500 
monitor formerly waited until the next SRC issued by the main job to : 
try to roll out the main job. It now tries to roll out the main job 
immediately. If the Proc PSC is within the Supervisor but not within 
the system transient area or in the control stream reader get-—next-—card 
wait loop, roll-out is deferred until the next interrupt from any 
source at which time the address within the Proc PSC is once again 
checked. 


ce. Problems have been corrected within the Supervisor concerning the use 
of the single inquiry work area for system type-ins (//KYN, -//ANS, etc.) oF 
while an inquiry program was active. Any system type-in, except for a . 
request to activate an inquiry program, can now be processed while an ~~ 
inquiry program is active. An inquiry from the system console while 
another inquiry is active is rejected with a "REJECT-INPUT" response. 
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4. Control Stream Logging. 


Various inconsistencies in Job Control's logging of the control stream have 
been corrected. The following will explain current practice: 


a. Each statement which is read by Job Control is logged only after it 
has been identified. If any error is detected in its contents, the MSG 
caused by the error will be printed after the control card image. 

b. If CLOG=JECF is specified, in addition to JOB, EXEC, CALL and FINIS 
statements, RUN and NOTE statements are also logged. 

c. If CLOG=ALL is specified, Job Control sets the X'4M' bit at ES$FLAGS in 
the Supervisor. This bit is tested by the PARAM card processing transient 
(PARAM?) ; if it is on, each PARAM card is logged, as well as the 
DATA READER statement if the system includes the SJCS option. Again, 
each card is logged only after it has been identified. 


If either CLOG=ALL or CLOG=JECF is specified, Job Control prints a message 
upon initial load that now includes the logical unit number, device address, 
and volume serial number of the system resident disc unit. 

5. OPR Macro Instruction Implementation. 


a. Programming Considerations. 


The format of the OPR Macro Instruction is: 


LABEL: OPERATION: OPERAND(S 
[tag] OPR addr [; mm} [- x\[ nn} 
WHERE: 


tag is the optional symbol to be attributed to the line containing 
the OPR. 


addr is the symbolic location of data which is to be displayed upon 
the system console. 


mm is the length of the data to be displayed. Maximum permissible 
value is 255. 64 is assumed if mm is omitted. 
x is any character; this parameter is ignored by the Assembler and is 


present only for compatibility with the format of the OPR macro 
under OS-4, 


nn is the maximum length of the expected reply. If nn is omitted, this 
signifies that no reply is expected. Maximum permissible value is 255. 


addr, mm, and nn may be any valid Assembler expression. The machine code 
produced by the Assembler is as follows: 


pe Y(X'A198') SRC opcode; same as MSG 
pc Y (addr) 

DC Y (mm) 

pc x'4g' 

Dc YL1 (nn) 


The OPR Macro Instruction is an "internal" Assembler macro, just as are 
OPEN, CLOSE, MSG, FETCH, etc. It may be assembled by any new tape or 
disc assembler. It can only be executed meaningfully under the control 
of an OS-500 Supervisor. The OPR feature is available regardless of 
‘whether the Supervisor includes inquiry capabilities. 


Examples: 
(1) OPR AREAL 
(2) OPR AREA2,25 


(3) MVC OPRWORK (12) , =C'TEST MESSAGE! 
OPR OPRWORK,12,,1 


(4) MVC OPRWORK (L'MSG1) ,MSG1 
OPR OPRWORK,L'MSG1,X,L'MSG1 


(5) OPR TRASH,5,,5 
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(1) The contents of an area labelled AREAl are to be displayed; the 
assembler inserts the default length of 64 bytes. 

(2) The 25 bytes beginning at AREA2 are to be displayed. 

(3) "TEST MESSAGE" is to be displayed; a non-byte reply is expected and will 
be available in OPRWORK. Note that the third operand ("x") must be 
accounted for by a comma even though it is omitted. 

(4) The contents of MSG1 are moved to OPRWORK and displayed; a reply is 
expected whose length is to be no longer than that of the data displayed, 

(5) The contents of the area labelled TRASH are to be displayed and are 
to be overlaid by the operator's reply. 


b. Operating Considerations. 


The Supervisor distinguishes between an OPR and an MSG by examining bytes 
2 and 3 of the SRC instruction; if they are non-zero, OPR is assumed. 

OPR always causes output to, and input from, the system console. If the 
output area contains trailing blanks, the’ 0S-500 monitor scans to the 
last significant character and only causes the number of significant 
characters to be written on the console. This maximizes throughput and 
permits the programmer to use one work area to put out messages of 
various lengths without having to concern himself with the length of each 
possible message. The length of the work area itself may be specified 

in the OPR as long as the area is cleared to blanks before moving output data 
to it. If a reply is expected, O0S-500 clears the message area to blanks 
before turning on the clear-to-send light. Since OPR uses much of the 
previously-—existing MSG code in the Supervisor, its impact on Supervisor 
size is minimal. There is no restriction on the issuance of OPR macros 
by symbionts. The program or symbiont issuing the OPR is suspended until 
the data to be displayed is typed out and the reply (if desired) is 
received. 


Since OPR is similar in use to MSG, and since roll-out cannot take place 
with either an MSG or OPR outstanding, programmers should use discretion 
when writing OPR's in programs in an environment where many inquiries 

are taking place. OPR may be used by inquiry programs to display messages 
on the’ system console without having to resort to CNTRL macros to change 
DIFUQ's inquiry station's logical unit number. 


The Supervisor issues a carriage return/line-feed function before printing 
the OPR data. If a reply is desired, another carriage return/line-feed 
is issued before accepting the reply. 


Suspendibility. 


In keeping with the new concept of suspendibility described in lb. above, 
we no longer arbitrarily make the system non-suspendible during the 
functioning of Job Control. The suspendibility bit of the monitor 
activity byte is set or reset at only three times: 


a. It is always set when Job Control enters its FINIS loop. 


b. It is always set by the Inquiry IOCS routine (generated by DTFUQ 
declarative macro) of an inquiry program at initialization (IN7?U). 
This permits the roll-out of any inquiry program which is loaded 
through the control stream while it is not actually processing 
an inquiry. 


c. When any main program is loaded, after all PARAM cards have been 
processed, the system's state of suspendibility is set/reset in 
accordance with the STATE option chosen at system generation time 
unless this "normal" state is overriden by a PARAM N or PARAM §S card. 
The former card is recognized only if the system's normal state is 
suspendible; the latter only if its normal state is nonsuspendible. 
Once set at program-load time, the system's state of suspendibility 
remains the same through the subsequent job step processing by 
Job. Control up to the point where the next program is about to be 
given control. 
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7- Use of the SOE Character. 


Changes have been made to the Supervisor and to DIFUQ to permit the 
omission of the SOE character in input from a Uniscope. It is no 

longer assumed that all input data starts with a SOE. When activating 

a program or scanning data for an inquiry program, the SOE is tested for 
but ignored. On output to a Uniscope for printing under program control, 
a SOE is inserted only when the output message begins at other than the 
first row and column of the screen. 


g- Suggestions for Testing and Debugging Inquiry Programs. 


The techniques described herein are based on discussion of inquiry 
programming problems and methods with many experienced programmers. 
Although each application may seem unique, there are certain methods of 
testing new programs which may simplify the programmer's tasks. 


a. Local Console Use. 


When testing an inquiry program, it is to the programmer's advantage 
to be in the general vicinity of the computer. The need to maintain 
parallel communications between the on-site operator and the 
programmer at a remote Uniscope or DCT-500 (or vice versa) only adds 
to the problems inherent in any debugging situation. Even when the 
"remote" inquiry device is in the same room, the uncertainties of 
modems, DCS, and line conditions often add confusion to the picture. 
We therefore suggest that all inquiry programs be tested initially through 
the system console. This permits the programmer to eliminate bugs 

in his own processing logic as quickly as possible. Even if the 
program, when placed into production, will function only from a remote, 
those features of it which are dependent on remotes (scope coordinates 
or CNTRL macros to printers or paper tape units) can be bypassed until 
the basic user program logic is functional. 


b. Execution Through Control Stream. 


When a new program is being debugged, it is invariably necessary to 
make on-the-spot corrections to insert halts, bypass inoperative 
code, and otherwise modify the program without having to 
reassemble/recompile/relink. Patching is difficult or impossible 
if the program is being "rolled in" from SYSEXAR or SYSFILE. It i 
may also be bothersome to carry out LIBS or SHEAF updates each i 
time the program is regenerated. For these reasons, we suggest i 
that debugging of new, or updated, inquiry programs take place by 

executing the program through the control stream from whatever 

work file it was linked into. This facilitates the use of PARAM 

cards and manual keyins for quick corrections. 


c. DI@FUQ Generation Listing. 


rN 


It is difficult to debug a new program without seeing what is taking 
place inside the Inquiry IOCS routine generated by DTFUQ. We have 
made every effort to document DIFUQ's operation by the insertion of 
meaningful comments. The PRINT NOGEN statement should not be used, 
at least for the first time a new inquiry program is being assembled. 
If your UNIVAC Systems Analyst must communicate with Blue Bell 
concerning problems in inquiry programs, it will be necessary for him 
to have a generated listing of the DTFUQ used by your program 
available for comparison and possibly for making fixes to problem 
areas. If you wish to keep reassembly time to a minimum, do not 
assemble DIFUQ with each worker program, but keep a "standard" set of 
DIFUQ—generated relocatable elements in a permanent library from which 
they may be linked to any inquiry program. 
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Non-Transient DTFUQ. a 


It is sometimes necessary to insert stops within DTFUQ in order to trap 
a particularly bothersome problem, even though the problem may not be 
caused by software failures. When memory space permits, while an 
inquiry program is being debugged, its Inquiry IOCS should be one that 
was generated without TRAN=YES being specified. This permits you to 
see the entire IOCS routine being used by your program and to isolate 
and correct more quickly whatever problems may arise. If available 
memory is limited, make the heaviest possible use of Disc IOCS 
transients while debugging to compensate for using a non-transient 
DTFUQ. 


9. Corrections and Improvements in DTFUQ. 


ae 


Many corrections were made to DIFUQ to permit it to interface correctly 
with changes made to the Supervisor. The following restrictions must 
be made on the use of programs generated by previous levels of DIFUQ 
with the new Supervisor: 


(1) Any program whose DTFUQ was generated with TRAN=YES specified 
is no longer operational and must be relinked/regenerated with > 
a new DIFuQ. 


(2) Any program which operated in the single inquiry mode (SINQ=YES) 
can be activated under the new Supervisor only by typing 
in "//RUN," followed by all eight characters of its program-i.d. 


The NICL parameter and all code associated with it has been deleted 
from DTFUQ. Its use was made unnecessary by the implementation of the 
OPR macro. 


The processing of input carriage returns was different if the input ~~ 
was from a Uniscope or from a local console or DCT-500. Carriage 

return characters (X'9D') are now eliminated from all input unless 

IPCR=YES is specified. 


DTFUQ's generation of diagnostics for possibly erroneous combinations 
of parameters has been improved. Wherever possible, default 
assumptions are made; they are described by MNOTEs. If errors are 
detected which would prevent the generation of valid code, they are 
flagged by PNOTEs and the generation of DIFUQ is aborted. 


The voluminous comment lines which formerly were included in the DTFUQ 
Proc have been eliminated; all information pertinent to the generation 
and use of DIFUQ is contained in the O0S-—500 Programmers Reference Manual, 
as updated and amended by this release memo. 


Various errors in DITFUQ's data translation and move routines have been 
corrected. These errors formerly caused garbage to be transmitted, 
abort status, and incorrect lengths to be inserted in input data. . 


It is no longer necessary that the work area defined in the GET or PUT 
instruction be halfword-aligned. 


The inquiry IOCS routine now checks, in all generations, for the file 
being opened. Issuance of OPEN to a previously opened file or of other 
macros to a file that is not open will cause a X'4171' halt. 


The inquiry IOCS now makes only one scan through the data being 

transmitted or received; it formerly made as many as three. We believe 

this will increase throughput significantly in programs which transmit 

and receive entire screens of data. Output to a local station is done : 
without any scan being made for purposes of shifting or translating. - 
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Due to the many changes being made, it was necessary to break the Inquiry 
IOcS Transient down into two transients, one for OPEN and CLOSE 
processing and the other for GET/PUT/CNTRL. Since the two new 

transients are each considerably smaller than the former transient, 

this change has permitted us to cut the size of the system transient 

area and therby reduce slightly the size of the resident Supervisor. 


Due to the design of the Inquiry IOCS transients, the following 
restriction must be observed if TRAN=YES is specified: 


If the CNTRL macro is issued for any purpose, no processing which could 
cause the loading of any other transient can intervene between the 
CNTRL and the succeeding GET or PUT macro. 


10. In addition to the changes described above, the following information 
from preceding release memos is still applicable: 


Corrections to UP-7869 (Rev. 3): 


ae 
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Page 2-11 - The last sentence under "Error" should read: 


When the UNISCOPE 18% is the remote device, ERRO=label must be 
specified. ERRO=IGNORE is not an acceptable specification. 


Page 2-13 - The explanation of U1@@=YES should read: 


YES specifies that this generation of DTFUQ will be used for 
processing inquiries from remote UNISCOPE 1977's. 


Page 3-1 - The last sentence of paragraph 3.2 should read: 


When typing in messages to the system or input data to a user program 
which uses DTIFUQ, the operator does not need to hold down the shift 
key to type in alphabetic characters. If a user program issues its 
own requests to the OS-500 monitor (SRC 9,52), it must either require 
that the operator hold down the shift key to type in alphabetic 
characters, or else OR on the X'4f' bit of each alphabetic character 
received. 


Pages 3-3 and 3-4 - The following information supplements or corrects 
the information provided in the manual: 


(1) 08-500 differentiates between console displays ("//MSG" type-outs) 
which require answers and those which do not. The issuance of the 
former by a main program or symbiont will cause that program to 
be suspended until such time as the operator replies to the 
message by a "//ANS" type-in. The issuance of the latter will 
cause control to be returned to the issuing program as soon as the 
display has been typed out on the console typewriter. The 
operator may distinguish between the two types of messages by 
the presence or absence of the letter "A" (signifying "answer 
required") following the four-digit message. Only those displays 
which are caused by a MSG macro which includes the "REPLY" 
parameter will result in an answer-required situation. Programs 
which execute message macros for the purpose of causing operator 
action such as changing printer forms, correcting erroneous input ; 
cards, etc., should issue a MSG with REPLY specified, even : 
though the value of such reply is of no interest to the program. 
All MSG macros in the Supervisor and Job Control program include i 
the reply parameter since they usually require that the operator 
take some action (changing tapes or disc packs, correcting job 
control cards) before processing can continue. MSG macros in 
other software elements have been examined for the desirability of 
requiring a reply and have been converted on a selective basis. 
Any routine which operates in I/O mode and issues console messages 
via a branch-and-link to E?DS must not expect a reply to be 
available to it. Control will be returned to it as soon as 
the message has been typed out. 
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(2) When the main job is cancelled or a symbiont is killed, 0S-500 
clears the message table of any pertinent messages, thus preventing 
the wiping out of another program if the operator attempts to 
answer a "dead" message. 


(3) Since messages issued by routines operating in I/O mode do not 
require a reply (see "1." above), when the operator wishes to 
restart a device which was placed in error status, he simply 
types in "//KYN,Dx", with x being device type. See UP-7531 (Rev. 5), 
page 3-6, for a table of acceptable device types. 


(4) Disc and tape error recovery procedures conform to error recovery 
procedures for other device types. When a tape or disc unit is in 
error status, it may be restarted by typing in: 


//KYN, Dx, mmmm, rr OR 
//KXN, Dx, mmmm 


"x" is @ for tapes, 7 for discs; "mmmm" is the message which 
announced the drive's error status to the operator; "rr" is the 
one-byte reply which the halt display manual requires for the 


particular message. If "rr" is omitted, zero is assumed; in most 
cases, the zero reply signifies a retry attempt. 


(5) Under 0S-500, no MSG may have a value greater then X'7FFF'. 
e. Page 4-18: 


(1) When generating any disc-resident supervisor, the symbol "E?XS" 
must appear in the operand field of the "END" statement. 


(2) When generating an OS-500 that includes remote inquiry stations, 
COMM=YES must be specified in supervisor generation. 


f. Page 4-19: 
The opcode on the first line of the coding sheet should read "CFG%A". 
g. Page 4-21: 
(1) When generating Job Control for an 0S-~500 system, OS5H=YES must 
be specified. If the system includes remote devices, COMM=YES 


must also be specified. 


(2) When generating any Job Control program, the symbol "STRT" must 
appear in the operand field of the "END" statement. 


(3) When generating Job Control for an OS-500 system, either CLOG=ALL 
or CLOG=JECF must be specified. . 


11. System Transient Area Size. 


The size of the system transient area for OS-500 is X'#52g' (1312) 9) bytes 
except when the Supervisor is generated as follows: 


ROLL=YES plus INQPL=SLOW or INQPL=BOTH, size is X'956P! (1376, 9) bytes. 
same, plus concurrency (OS5C), size is X'@#5aAg' (1449, 9) bytes. 
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APPENDIX N_. 8411/8414 DISC UTILITIES (DASM, DPRT, ISF) 


A. DASM 
Problems Corrected 


1. When DASM detected an error in the parameter cards of an 8414 
DASM run, it inadvertently reset itself to DASM an 8411 pack. 


2. The disc 'track size calculation' routine was in error on various 
block sizes in its calculation of blocks per track for both 8411 
and 8414. 


Enhancement 


DASM has been modified to permit an optional 'END' control card. If a 
missing 'END' card is detected in a control stream, a pseudo end card 

image '.END' will be printed within the VTOC input diagnostics section 
and processing will be continued with a dummy, map-option 'END' card. 

In addition, this enhancement eliminates the X'12FF' halt. 


For example, the following two control streams will obtain identical results. 


Dvc DvC 
VoL VoL 
LBL LBL 
EXT EXT 
pvc END* 
VoL Dvc 
LBL VOL 
EXT LBL 

EXT 

END* 


*Note: The END control card is not compulsory. 


B. DPRT 
Problems Corrected 


1. Valid logical unit numbers specified larger than X'#9' would not 
' print the logical unit # correctly, although the correct logical 
unit was processed. 


2. A retry response to a X'69u2' display would result in a loop. 


a 


c. is 


Problems Corrected 





1. No check was made to prove that block size (NREC*RCSZ) plus key length 
(KLEN) was not greater than track size for the applicable disc 
(8411/8414). If specifications are made where BKSZ+KLEN is greater. 
than 3605 for 8411's (7249 for 8414's) an error message 
***BKSX+KLEN > TRACK*** will be printed and the ISF run will be cancelled. 
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2. Cylinder Index extent alignment was incorrect when the cylinder index 
did not begin on a cylinder boundary. 


3. No check was made to prove that the space required for the cylinder 
index (as calculated by ISF) was not larger than the space 
specified as allocated by the cylinder extent. If this does occur, 
an error message ***INSF INDEX TRACKS*** will be printed and the 
ISF run will be cancelled. 
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APPENDIX O. DUMP/RESTORE UTILITY (DPRS) 


1. The following DPRS bugs have been corrected: 


a. When restoring a multi-reel dump tape, DPRS would reject the 
second reel of the tape as having the wrong file header. 


b. When dumping a file which contained an end-of-file mark at the 
beginning of a track (record one), the end-of-~file mark was not 
copied. 


2. DPRS execution times have been greatly improved by changing its logic to 
read a track at a time instead of a record at a time. The following 
timings are for dumping/restoring entire packs and should indicate the 
relative increase in throughput: 


tape-to 
Function: 8411-to-g4]] 8414-~to-8414 8411-to-tape 8414-to-tape tape-to-8411 -8414 
Old time: 28 74 29 65 19 19 
New Time: 7 8 6 8 6 9 


3. To implement this increase in speed, it was necessary to simplify some 
portions of DPRS. The following restrictions now exist: 


a. DPRS must have enough room in memory to hold an entire 8414 track. 
This requires that if it is to be used in a 16-K machine, it must be 
linked with PCH equated to @ and no punch IOCS included. If DPRS 
finds that it does not have room to hold an 8414 track, it will try 
to make more room available for a disc-to-disc dump by overlaying 
its tape and card dump capabilities. If it does so, it will print 
self-explanatory messages to that effect on the bar printer. 


b. Dump tapes which contain "partial-track" dumps (X'CC' in the last 
byte) can no longer be restored. To determine whether a tape might 
contain partial track blocks, consult the printer listing produced 
when the tape was created. If the "available work area size" was less 
than track capacity, it is possible that partial track blocks exist. 


c. Display 2Bh3 is no longer given. If no punch IOCS was linked to DPRS 
or if it was necessary to delete card I/O capabilities to make room for 
disc-to-disc dumping, display 2Bhl now occurs. 


dad. Since all dumping and restoring is done on a track-at-a-time basis, all 
error printouts which result from read/write errors will give only 
cylinder and head addresses. If any read/write error occurs for a 
track, one dummy block will be generated for the track if the. 
operator's reply is to continue processing. 
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APPENDIX P. TAPE CROSS-REFERENCE UTILITY 





A. 


A new tape cross-referencing utility is now available. 


The only function of this utility is to cross-reference assembler 
source code from either tape or the control stream reader. 


NOTE: The tape cross-referencer can be used in a disc environment only 
if the generated system has tape capabilities. 


Input is controlled by command cards. The control character (specified 
when linking by "DEL") must appear in column 1 followed by at least one 
blank character. The "command" may be any word beginning with an 
alphabetic character. 
1. CARD INPUT. The command card has the following format: 

VY COMMAND CARDS 

EXAMPLE: 
V copy CARDS 


To list a module while cross-referencing card input, the "command" 
word must begin with the letter "L". 


EXAMPLE: 
VY LIST CARDS 


Listings will respond to SPACE, EJECT, and TITLE directives within the 
source element. 


CARD$ identifies the input as coming from the control stream reader. 
The source deck must immediately follow the "command" card. 


2. TAPE INPUT. The "command" card has the following format: 

VY COMMAND GROUP-NAME/MODULE-NAME,L.U.# 
The "command" may be any word beginning with an alphabetic character. 
This could eliminate keypunching a new card if the card has been used 
in a LIBS run. 
EXAMPLE : 

V copy /XREF 
"GROUP—NAME" must.be in the same format as a library services command. 
“MODULE-NAME" is the name of the source code module to be cross-— 
referenced. "L.U.#" is the logical unit number on which the module 
resides, expressed as one or two valid hexadecimal digits. 
EXAMPLE ; 

V COPY MACROLIB/UNIVAC/EXECMODL/JBCN , 09 
NOTE: If the logical unit number has not yet been specified, the 


default is to logical unit g, otherwise the logical unit 
number from the previous "command" card will be used. 
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3. No further cards will be read from the control stream until the 
particular module in the "command" card has been cross-referenced. 


Macro definitions may be included in the source code. All symbolic 
parameters containing an ampersand or a percent sign will be ignored. 
Keyword parameters will not be cross-referenced (e.g. TAPE=YES). 


Any number of modules, in any combination of source inputs, may be 
cross-referenced in one run. 


Each "command" card is checked for validity and invalid cards are 
flagged and ignored. 


All literals and constants in the operand portion of the source 
input record will be ignored, except for address constants. 


EXAMPLE 1: 
CLC TAGA,=CL2¢' ' 
where =CL2@' ' will not be cross-referenced. 
EXAMPLE 2: 
| CLC TAGA, =Y (TAGB) 


where TAGB will be cross-referenced. 
NOTE: No output tape is required. 


"**NODATE**" will be printed on every header page of the listing a 
if the supervisor's date contains all 1 bits (6 bytes of X'FF'). 


A 'DATE' card placed in front of the run deck will override the 
‘NO DATE' printout. 


B. LINKING PROCEDURES: 
The following elements are required to link the cross-reference utility: 
1. TXREF -— the relocatable supplied - for TAPE and CARD cross-referencing. 


2. TPRYTR- the relocatable transient supplied for the printer I/O. This 
deck is for the bar printer only. If the user desired to 
output his listing on the drum printer or the 19%4 printer, etc., 
the user must assemble a new DIF element which uses such 
printers. The filename of this IOCS routine should be 'TPRY!', and 
the printer overflow routine must be specified as PROV=FFOV. 


3. PLUN - the relocatable logical unit tables element generated during 
SYSGEN procedures. 


4. DEL EQU 'n' — where 'n' (as in the LIBS manual) is the compressed 
code value, expressed in decimal or hexadecimal notation, 
of the control punches in column 1 of the "command" cards. 
For example, if Vis desired as the control character, 
DEL EQU 85 or DEL EQU X'55' must be specified, and the 
punch is 12-9-2. 


NOTE: A UNITS statement must be used when linking the tape cross-referencer 
if a transient TAPE dispatcher is desired. Refer to Operating e 
System Manual, UP-7531 Rev. 5, Sections 8.6 through 8.6.6. ond 
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It is possible to use the same card as in a LIBS run deck to cross-reference 
a module by equating DEL to the same value as when LIBS was linked. 


It is not necessary to link any control stream reader element to the 
program, since it is part of the main cross-reference element -— TXREF. 


Cards are read from the control stream read device as specified at systems 
generation time. 


When linking the cross-referencer, TXREF must always appear last. 


EXAMPLE: (a control stream linker deck run) 


/ EXEC DL11 
/ DATA Cc 
CTL card 


PRGM TREF, * 

LIBE NONE 
DEL EQU X'55! (or DEL EQU 85) 

INCLUDE /TPRYTR 

INCLUDE /PLUN 

INCLUDE /TXREF 
/* 
With this new routine it is now possible to cross-reference source code 
in 16K because of a recycle feature. Cross-referencing in a 16K tape 
environment was a previous restriction with LIBS. 


Symbols, when cross-referenced, will appear in alphabetical order on 
the printout. 


The cross-referencer uses all memory from the end of where the program (TXREF) 
is linked to the end of available memory for storage of symbols, their 
references, etc. 


The contents of the boundary table will be adjusted to reflect the 
memory available to the cross-~reference routine when Symbionts are used. 


It is advisable to run the cross-referencer without symbionts because of 


memory limitation to prevent the cross-referencer from recycling and 
making more passes of the input source code. 


RESTRICTIONS : 


At this time, it is impossible to cross-reference a group. Each element 
to be cross-referenced must be specified. 


ERROR HANDLING: 


See chart in Appendix Q, paragraph D. 
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E. SPECIAL NOTE: RECYCLING 


When the symbol table has filled all available memory, recycling occurs 
if more symbols are to be processed. As a result, certain symbols may 
have "**NODEF**", or "***UNREFERENCED***" printed beside them. These 
symbols should be checked since their definitions and/or references 
may appear on subsequent or previous recycle passes, 


F. HARDWARE CONFIGURATION: 





The 929MII Configuration must be equipped with the hardware multiply/ 
divide/edit features. 


G. TAPE PROCESSING CONSIDERATION: 


It is advisable to have the "command" cards in the control stream deck 
in the same sequential order as the modules would appear on tape. This 
is to avoid getting "MODULE NOT ON TAPE" diagnostics. 


The tape will be rewound by the cross-referencer when either of the two 
following conditions have been met: 


1. The 'END' record on tape has been encountered subsequent to 
cross-referencing the module designated in the "command" card 
without any intervening 'ELT' record. Processing resumes after the 
tape is rewound to load point. 


2. If after reading another "command" from the control stream and 
the following conditions are met: 


a. the tape is not on load point and 

b. at least one 'ELT' record is detected subsequent to 
the module that has already been cross-referenced, and 

c. the module name specified in the current "command" card 
is not found prior to encountering an 'END' record on 
that tape. 


NOTE: "MODULE NOT ON TAPE" diagnostic will be issued. The next 
"command" card is processed. 


H. DOCUMENTATION: 


Changes will be made to the TAPE UTILITY Manual UP-7727 to reflect 
this new feature. ; 
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APPENDIX Q. DISC CROSS-~REFERENCING UTILITY 


A. A new disc cross-referencing utility is now available. 


The only function of this utility is to cross-reference assembler source 
code from either 8411/14 disc or the control stream reader. 


Input is controlled by command cards. The control character (specified 
when linking by "DEL") must appear in column 1 followed by at least one 
blank character. The "command" may be any word beginning with an 
alphabetic character. 
1. CARD INPUT. The command card has the following format: 

VY COMMAND CARDS 

EXAMPLE: 
V COPY CARDS 


To list a module while cross-referencing card input, the 
“command" word must begin with the letter "L". 


EXAMPLE: 
V LIST CARDS 


Listings will respond to SPACE, EJECT, and TITLE directives within 
the source element. 


CARD$ identifies the input as coming from the control stream reader. 
The source deck must immediately follow the "command" card. 


2. DISC INPUT, The "command" card has the following format: | 


V COMMAND GROUP-NAME/MODULE-NAME, L.U.#,FILE-NAME 





The "command" may be any word beginning with an alphabetic character. 
This could eliminate key-punching a new card if the card has been used 
in a LIBS run. : 
EXAMPLE: 

V copy /XREF 


If the "command" word, as with card input, begins with the letter "L", 
the source element from disc will be listed. 


EXAMPLE: 
V LIST /XREF 
"GROUP—NAME" must be in the same format as a library services command. 
"MODULE-NAME" is the name of the source code module to be cross-referenced. 
"L.U.#" is the logical unit number on which the module resides, 
expressed as one or two valid hexadecimal digits. 
"FPTLE-NAME" is the name of the disc file-id (result of DASM) in which 
the module is to be found. 
EXAMPLE : 


VY COPY MACROLIB/UNIVAC/EXECMODL/JBCN,@%,SYSFILE 
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NOTE: If the logical unit number and file-name has not yet been 
specified, the default is to logical unit Y, and "SYSFILE". 
Otherwise the logical unit number and file-name from the 
previous "command" card will be used. 


No further cards will be read from the control stream until the 
particular module in the "command" card has been cross-referenced. 


Macro definitions may be included in the source code. All symbolic 


parameters containing an ampersand or a percent sign will be ignored. 
Keyword parameters will not be cross-referenced (e.g. DISC=YES). 


Any number of modules, in any combination of source inputs, may be 
cross-referenced in one run. 


Each "command" card is checked for validity and invalid cards are 
flagged and ignored. 


All literals and constants in the operand portion of the source 
input record will be ignored, except for address constants. 


EXAMPLE 1: 


CLC TAGA,=CL2¢' ' 


where =CL2f' ' will not be cross-referenced. 
EXAMPLE 2: 


CLC TAGA, =Y (TAGB) 
where TAGB will be cross-referenced. 


NOTE: No output disc file is required. 


"**NO DATE**" will be printed on every header page of the listing if the 
supervisor's date contains all 1 bits (6 bytes of X'FF'). 

A 'DATE' card placed in front of the run deck will override the 

'NO DATE' printout. 


B. LINKING PROCEDURES: 


The following elements are required to link the cross-reference utility: 


1. 


DXREF -—- the relocatable supplied ~ for DISC and CARD cross-referencing. 


NOTE: DXREF uses the transient "PILE?" to locate both the 
file-name and the module-name. 


TPRYTR- The relocatable transient supplied for the printer I/O. This 
deck is for the bar printer only. If the user desires to 
output his listing on the drum printer or the 19%4 printer, étc., 
the user must assemble a new DIF element which uses such 
printers. The filename of this IOCS routine should be 'TPRY' and 
the printer overflow routine must be specified as PROV=FFOV. 


PLUN - the relocatable logical unit tables element generated during 
SYSGEN procedures. 


DEL EQU 'n' — where 'n' (as in the LIBS manual) is the compressed code 
value, expressed in decimal or hexadecimal notation, of 
the control punches in column 1 of the "command" cards. 
For example, if Vis desired as the control character, 
DEL EQU X'55; must be specified, and the punch is 
12-9-2. 
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It is possible to use the same card as in a LIBS run deck to 
cross-reference a module by equating DEL to the same value as when LIBS 
was linked. 


It is not necessary to link any control stream element to the program, 
since it is part of the main cross-reference element — DXREF. 


Cards are read from the control stream device as specified at systems 
generation time. 


When linking the cross-referencer, DXREF must always appear last. 


EXAMPLE: (a control stream linker deck run) 


J EXEC DL11 
/ DATA Cc 
CTL card 


PRGM XREF, * 
LIBE NONE 
DEL EQU X'55* (or DEL EQU 85) 
INCLUDE /TPRYTR 
INCLUDE /PLUN 
INCLUDE /DXREF 


/* 
The disc cross-reference routine will fit into 16K. 


Symbols, when cross-referenced will appear in alphabetical order on 
the printout. 


The cross-referencer uses all memory from the end of where the program 
is linked to the end of available memory for storage of symbols, 
their references, etc. 


The contents of the boundary table will be adjusted to reflect the 
memory available to the cross-reference routine when symbionts are 
used. 


NOTE: It is advisable to run the cross-referencer without symbionts 
because of memory limitations, and to prevent the cross-referencer 
from recycling itself and making more passes at the input source 
code than really required. 


C. RESTRICTIONS: 


At this time, it is impossible to cross-reference a group. Each 
element to be cross-referenced must be specified. 
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D. ERROR HANDLING 


DIAGNOSTIC 


INVALID COMMAND 


TOO MANY GROUP NAMES 


MODULE NAME MISSING 


INVALID L.U. NO. 


NIT IS DOWN 


ODULE NOT ON rape 


END STATEMENT MISSING 


‘ABLE OVERFLOWED 
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MEANING 


The command card does 
not have a valid control 
character in Col. l. 

The command specified 

is invalid. 


Group levels have 
exceeded the allowable 
5. 


No group or module 
name specified. 


The logical unit number 
is invalid. 


The physical unit table 
entry indicates the 
unit is not available. 


The module-name cannot 
be found on the tape 
specified, or within 
the specified group- 
name. Tape mark read - 
no more modules. 


Assembler program with 
a missing END record. 
(Will occur on all 
PROC 's) 


Not enough memory to 
cross-reference entire 
source coding in one 
pass. 


Undefined symbol 
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ACTION 


The command is ignored. 
If not at end-of-file, 
a new card is read. 





The command is ignored. 
If not at end-of-file, 
a new card is read, 


The command is ignored. 
If not at end-of-file, 
new card is read. 


The command is ignored. 
If not at end-of-file, 
a new card is read, 


The command is ignored. 
If not at end-of-file, 
a new card is read. 


The command is ignored. 
If not at end-of-file, i 
a new card is read. 


If a PROC ignore the 
error. If not a PROC, 
check for missing END 
record. In either case, 
processing continues. 


Processing continues 
with recycling, until 
all source coding for 
that module is 
processed. 


Processing continues, 
but check symbols 
against references. 
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* ** DUPLI CATE* * * 


* * XUNREFERENCED* ** 


@ TAPE ONLY 


(2) DIsc ONLY 
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Duplicate symbols 


Unreferenced symbol 


Tape IOCS Halts 
(2fux) 


Program not found 
on physical unit # 
specified. 


8411/14 LOCATOR/ 
LOADER HALTS 
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Processing continues, . 
but check duplicate 
symbols against each 
other. ‘ 


Processing continues, 
but check if symbol 
can be deleted. 


No diagnostic will be 
issued if a non-zero 
keyin is made to retry. 
Press START. 

If no keyin is made, 
the diagnostic will be 
given, and the source 
that has been processed 
up to this point will 
be cross-referenced. 

If not at end-of-file 
a new card will be 
read and processing 
continues. See 
9299/930% HALT/DISPLAY 
Manual. 


Press START switch 
to cancel. 


Press the START switch 

to cancel; or make a 

non-zero keyin to 

retry. See 9299/9399 
HALT/DISPLAY Manual 

for further explanation ; 
of halts. 
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E. SPECIAL NOTE: RECYCLING 


When the symbol table has filled all available memory, recycling occurs 
if more symbols are to be processed. As a result, certain symbols may 
have "**NODEF**", or '"***UNREFERENCED***" printed beside them. 

These symbols should be checked since their definitions and/or references 
may appear on subsequent or previous recycle passes. 


F. HARDWARE CONFIGURATION: 


The 928PII Configuration must be equipped with the hardware multiply/ 
divide/edit features. 


G. DOCUMENTATION: 


Changes will be made to the Disc SS UTILITY Manual, UP-7835, Rev. 2 
to reflect this new feature. 
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APPENDIX R. NOTE JOB CONTROL CARD 


The purpose of the NOTE card is to insert comment cards in the System Job 
Control Stream (SJCS), or whenever a comment card is needed in a Job Control . 


Stream deck. 
The format of the NOTE control card is: 


1 10 16 
/ | j NOTE COMMENTS 
Should Contain 


Spaces (See Appendix S) 


On reading a NOTE card, Job Control will ignore it and read the next card. 
However, if the SKIP command is in force, columns 3-8 of NOTE cards 


are checked for the label being SKIPped to. 


Comments are allowed in columns 16~89. 
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APPENDIX S. SKIP JOB CONTROL CARD 


The SKIP command has been expanded. Positional parameter 1 has been 
defined and positional parameter 3 has been added. The format of the 
expanded SKIP command is: 


LABEL OPERATION OPERAND 


1 1g 16 
N) ff} yy ( 
/ SKIP fuaex] , Doe + TEPDTHQPH | CP 
yy {1 x 


The function of the SKIP command card is to make a test between the SKIP 
byte, as specified by positional parameter 2, and the UPSI byte (location X'#117') 
and if the test makes the condition(s) specified by positional parameter 3. 


1. Cancel if LABEL (positional parameter 1) is unspecified or 

2. Bypass images in the control stream until a control card image (/ in col 1) 
is detected which contains the matching label at which point control stream 
processing is resumed. However, if a matching label is not detected all 
input cards are exhausted by the card reader (X'6140') and all control cards 
including FINIS, DVCUP, DVCDN and JOB are ignored, 


NOTE: If Cancel takes place and 


1. The control stream was being read from the system medium, the 
next (and subsequent) images will be taken from the card reader. 
At this point control stream processing continues as in the 
next paragraph. 


2. The control stream was being read from the control stream card 
reader; all control cards except JOB, FINIS, DVCUP and DVCDN will 
be ignored. JOB and FINIS will stop the cancel procedure and 
DVCUP and DVCDN will mark units up and down respectively. 


The test between the SKIP byte (positional parameter 2) and the UPSI byte 
is made by a Test Mask command with SKIP byte as the I2 value and the 
location of the UPSI byte as the OPl value. The results of the test can 
be controlled by the specification for positional parameter 3. The 
results of this test can be defined as: 


1. Non-match —- no one bits of the SKIP byte have matching one bits in the 
same position of the UPSI byte 


2. Partial Match - some one bits of the SKIP byte have matching one bits 
in the same position of the UPSI byte. 


3. Full Match - all one bits of the SKIP byte have matching one bits in 
the same position of the UPSI byte. 


The specifications for the three positional parameters are: 
Positional Parameter 1 LABEL 
A label is from one to six characters in length and may be comprised 
of any of the 256 available combinations of punches, except comma 
(0-3-8) and space (no punch). The use of a label implies that a 


following control card will have a matching label punched in columns 3-8. 


Labels in excess of 6 characters will be truncated to the most significant 
6 characters. 
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WM Positional Parameter 2 eel 


1 1 
Positional parameter 2 is the SKIP byte and is represented in the 
same manner as the UPSI byte of the UPSI control card. If less than 
8 bits are specified the least significant bits are assumed to 
he zero(s). 


Any representation other than 1 is treated as @. 


N N N 


@ Positional Parameter 3 P P P 


x Not 
N or 


x x x 


Positional parameter 3 specifies what test results of the SKIP 
byte/UPSI byte test are to cause a skip (to the label specified by 
positional parameter 1) or cancel (no label specified). 


The specifications may be used individually or in combination in any 
sequence. They are: 


N - a non-match condition will cause skip/cancel 

P —- a partial match condition will cause skip/cancel 
lg a full match condition will cause skip/cancel 

P 


Positional parameter 3 will be examined for up to 8 characters. 
Examination is terminated by the first blank position in a scan starting 
at the most significant position. 


The default (no positional parameter 3 specified) test is full match. 


@ Comments 


Positional parameter 3 must be separated from any comments by 
at least one blank column. 


Examples 1-16 which follow show some variations of the SKIP command card 
form and its use and are commented on below. In these examples, comments X 


is used 


Ex. 1. 
2. 
3. 
4. 
5. 
6. 
7. 
8. 
9. 


10. 


to represent either zero or l. 
COMMENTS 


An UPSI value of 1XXXXXXX will cause a skip to label ABCDEF. 

An UPSI value of @XXXXXXX will cause a skip to label ABCDEF. 

An UPSI value of 1XXXXXXX will cause a skip to label ABCDEF. 

If the UPSI value is not X1X1XXXX a skip to label X will take place. 
An UPSI value of X1X1XXXX or X@XP@XXXX will cause a skip to label X. 
An UPSI value of X111XXXX will cause a cancel. 

An UPSI value of X@@@XXXX will cause a cancel. 

An unconditioned skip to label Y will take place. 

An unconditional cancel will take place. 


An unconditional cancel will take place. 
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11. An UPSI value of 11XX11XX will cause a skip to label A1B2C3 to take place. 
NOTE: 1. truncation of label to six (6) positions 
2. none of the 'conditions' specified in positional parameter 3 
are N or P and therefore a full match only is assumed to be 
the test desired. 


12. An UPSI value of SPYXXPPXX will cause a skip to label A1B2C3. 
NOTE: see note 1 in example 11. 


13. An UPSI value of X1XX1XXX or XMXXPXXX will cause a skip to label 
2?l7.2:% to take place 
NOTE: the 'N' of GONE and the ‘non-N' and 'non-P' of GONE are the 
same as specifying NF or FN. 


14, If the UPSI value is not SPPPGWWP a skip to label #912345 will take place. 


15. A test is made at line 7 to determine if the assembler set UPSI bit 5 
because of assembly errors. If bit 5 is not set a skip to label A 
(line 10) will take place where the linking of the program will take 
place. 


If bit 5 is set, a halt/display of '@#M1' will occur because of the 
PAUSE card (line 8). If UPSI bit 5 is manually reset (set to @) at 
this time and run is depressed, the test at line 9 will fail and the 
program will be linked. 


If UPSI bit 5 is not manually reset at this time the test at line 9 
will be successful and a cancel will take place. 


An identical test is made in lines 14-16 on the results of the linker 
except, of course, UPSI bit 4 is the controlling bit. 


16. Example 16 is a variation on example 15. The test for any assembler 
or linker errors is made in line 11. If UPSI bits 4 and 5 are not set 
(UPSI is XXXX%%XX) a skip to label A will take place and the program 
will be executed. 


If UPSI bits 4 and/or 5 are set (UPSI is not XXXX#P@XX) halt/display 
'99Y1' will occur because of the PAUSE card at line 12. If UPSI 
bits 4 and 5 are manually reset at this time and run is depressed, 
the test at line 13 will fail and the program will be executed. 


If UPSI bits 4 and 5 are not reset at this time, the test at line 13 will 
be successful and a skip to label B will take place. At that point one 
of two things will occur: 


1. If the control stream was coming from the control stream reader 
a FINIS loop will be entered. 
2. «If the control stream was coming from the system medium, the 
next control stream image will be taken from the control stream reader. 


NOTE: In case 2, if line 13 was potentially a cancel (/ SKIP ,000011,PF) 
instead of a skip to label B an immediate reversion to the control 
stream reader would take place and that control stream would be 
bypassed until a JOB or FINIS control card was detected. That is, 
the cancel would be applied against the control stream reader. 
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LABEL OPERATION OPERAND 
1 10 16 
/ SKIP ABCDEF, 1 
/ SKIP ABCDEF,1,N 
3 / SKIP ABCDEF,1,PF (OR FP) 
4 / SKIP X,9191,NP (OR PN) 
5 / SKIP X,9191,NF (OR FN) 
6 / SKIP P111 (FULL MATCH ASSUMED) 
7 SKIP ,G111,N 
8 / SKIP Y,,N 
9 / SKIP 72N 
10) 0 O/ SKIP 7, FNP (OR ANY SEQUENCE OF N, P, F) 
110 / SKIP A1B2C3D4, 11991199, JUMTOTAG 
12. / SKIP A1B2C3D4,11991199,N 
13 / SKIP ?1;.:2%,X1991X, GONE 
14. / SKIP 912345,11111111,PF (OR FP) 
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EXAMPLE 15 





L 

I 

N LABEL OPERATION OPERAND 

E 1 10 16 

1 JOB SKIP TO A LABEL EXAMPLE ~ 14 FEB 75 

2 / DATE 1759214! 

3 / EXEC KSMB 

4 r 

5 7 

6 /* 

7 / SKIP A, PEGEG1,N IF NO ASSEMBLY ERRORS TO EXEC DL11 

8 / PAUSE GOR1 IF ANY ASSY ERRORS, DISPLAY '@@@1' 

9 «6 SKIP  PELLPL IF UPSI BIT 5 IS NOT RESET, CANCEL 
10 /A EXEC DLL UPSI BIT 5 WAS RESET OR NO ASSY ERRORS 
11 : - 
12 . 
13.0 = /* 
14. / SKIP B, P@GG1,N IF NO LINKER ERRORS TO EXEC LINKED PROGRAM 
15 / PAUSE WPG2 IF ANY LINKER ERRORS, DISPLAY '@@@2' 
160 / SKIP , PEGP1 IF UPSI BIT 4 IS NOT RESET, CANCEL 
17 /B EXEC PROGRAM UPSI BIT 4 WAS RESET OR NO LINKER ERRORS 
18 7% 
19 rs 
20 J* 
21 / FINIS FINIS LOOP AT END OF LINKED PROGRAM 
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EXAMPLE 16 





L Not 
I 

N LABEL OPERATION OPERAND 

E 1 10 16 

1 / JOB SKIP TO A LABEL EXAMPLE - 14 FEB 75 

2 / DATE 1759214! 

3 / EXEC KSMB 

4 . 

5 rs 

6 /* 

7 / EXEC DL11 

8 7 

9 ; 
10 ~=/* 
11 / SKIP A, 9GPGG11,N IF NO ASSY OR LINK ERRORS, TO EXEC PROGRAM 
12. / PAUSE GPP1 IF ANY ASSY OR LINK ERRORS, DISPLAY '9g@1!' 
13. / SKIP B,@@@G11,PF IF UPSI BITS 4 & 5 NOT RESET, TO FINIS 
14 /a EXEC PROGRAM UPSI BITS 4 & 5 RESET OR NO ASSY OR LINK ERRORS 
15 . 
16 . 

17 /* 

18 =/B FINIS 

aes 
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APPENDIX T. VOL _JOB CONTROL CARD 
The purpose of the VOL card is to check and verify the volume serial 
number of the disc on the logical unit number specified. 
The format of the VOL control card is: 
1 10 16 
/ VOL LU#, Disc Serial#bCOMMENTS 
@ Positional Parameter 1 


LU# - is the logical unit number of the disc unit expressed as 
a two-digit hexadecimal number. 


@ Positional Parameter 2 
,Disc Serial# - is the alphanumeric EBCDIC representation (6—-character 
maximum length) of the unique code assigned to the 
disc pack when DASMed. This number is resident on 
the disc pack in the Standard Volume Label (VvOL1). 


The halt/displays issued will be based upon the following conditions: 


HALT/DISPLAY CONDITIONS ACTION 
412F 1. logical unit number is See the HALT DISPLAYS MANUAL, i 
not assigned to a disc; UP-7719 Rev. 4. 


2. logical unit number is \ 
expressed as a one-digit 
number ; 

3. logical unit number is 
outside the LU/PU table 
range 


41Du The disc volume serial To retry: mount a different 
numbers do not match on disc pack on the physical unit 
physical unit ‘u'. u specified. Press START. 
To cancel: make an external 
cancellation keyin. (Operator 
request of X'F%')} Press START. 
41Eu Any disc device status For recovery procedures, 
other than a successful see 41Du. 


find on physical unit 'u' 
for the VOL1 label. 


Note: The VOL card should be inserted after JOB and SWAP 
control cards to obtain valid results. 
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APPENDIX U.. SEQUENTIAL DISC IOCS (DSPIT and DIFSD). 


1. Extensive changes were made to both DSPIT and DIFSD to provide faster 
assembly and more comprehensive error checking. Both must be assembled 
by the new (5.9% or higher level) assembler. 


2. Corrected errors in DSPIT's handling of variable length records which 
often resulted in data being lost or scrambled or in records with 
incorrect lengths being generated. The following information may clear 
up some confusion that exists on the subject of variable length records. 


ae 
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When delivering a variable length record to the IOCS for output, the 
first two bytes must contain the size of the data portion of the 
record, plus four. The actual data content of the record begins at 
record plus four bytes. The second two bytes are not used by 9300 
sequential IOCS but are zero-filled by the IOCS for compatibility 
with other systems. 


Upon input, the program receives the record in the same form in which 
it would write it out, i.e. with record size and system bytes in the 
first four bytes of the record. 


In generating DTFSD, RCSZ does not need to be specified for either an 
input or output file since the user program supplies and receives 
record size in the first two bytes of each record. 


If variable length unblocked records are being written, the IOCS appends 
an additional four-byte field to the beginning of each record. The 

two bytes contain the physical block size (total record size plus four); 
the next two bytes are not used by 9300 IOCS but are cleared to Zero. 
Therefore if an unblocked variable-length record contained 100 bytes 

of user data, it would occupy 108 bytes (plus 8-byte count) on disc. 


If an RPG program wishes to write variable-length records, it must 
insure that the first two bytes of each record contain the record size, 
as described in "a" above. For instance if a record to be written 
contained 75 bytes of data, a statement such as the following would 
have to appear in a calculation specification card: 


c MOVE X'@@4F' RECSZE 2 
and a statement such as the following in an output specification card: 
0 RECSZE 2 


The beginning of the actual data portion of the record would be 
considered to he byte 5 for purposes of filling out input and output 
specification cards. 


If programming in COBOL, each possible length of record to be written 
should have its own @1 level entry in the file descriptions. The 

length of the four extra bytes at the beginning of each record must 

not be added in; the COBOL compiler generates code which causes necessary 
conversion to take place. 


Errors formerly occurred if the work area from which a variable-length 
record was being written was not halfword-aligned. This is no longer 
the case. Work areas do not have to be halfword-aligned; all I/0 
areas (IOAl1 and IOA2) must be halfword aligned for any record format. 
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h. The use of a work area for writing variable-length blocked records is 
not mandatory but is highly recommended. If you choose to deliver 
variable-length blocked records in the I/O area via the IORG register, 
an additional area following the I/O area must be reserved which is 
as long as the largest record which might be written. When a record 
is delivered to the IOCS which would cause the blocksize to overflow 
the maximum specified by the BKSZ parameter, the IOCS writes out 
whatever data is in the I/O area, then moves the current record 
to the beginning of the I/O area. No VBLD parameter or TRUNC macro 
exists, as in Tape IOCS. 


When an IORG register was specified with fixed-length unblocked records 

and a single I/O area, sequential IOCS formerly failed to load the register 
with the address of the current input record. The use of IORG in such a 
situation is optional; if the programmer specified IORG in DIFSD, the 
register specified will be loaded with the correct address. 


The capability now exists of adding to a sequential disc file. For 
purposes of this discussion, "adding" consists of the ability to start 
writing new records at the address currently occupied by the end of 
file mark instead of being forced to start any output file at the 
beginning of the file. The following are some of the programming 
considerations involved in the use of this feature: 


a. To define a file as being added to, the following must be done: 


(1) In Assembler, include ADD=YES in the parameters specified when 
generating DIFSD. 


(2) In RPG, punch an "A" in column 66 of the "F" card describing the 
- gequential file which is to be added to. 


(3) In COBOL, no direct means exists of specifying addition, but the 
file table of the file in question may be modified either by a 
PARAM card or by an Assembler subroutine. In the compilation 
listing's data division map, the address of each disc file table 
is given. The contents of byte ten of the file table (table 
plus X'A') must be changed from @% to G4. Byte eleven always 
contains zeroes initially. Therefore, to modify a COBOL program 
whose sequential file table began at X'2258' by use of a 


PARAM card: 
/ EXEC COBPROG,%@1,LOADLIB 
/ PARAM R2262:849¢ 


The modification of the program could be done selectively with the 
PARAM card omitted when it was desired to start at beginning of 
file. Assembler programmers may also wish to use this technique 
but should remember that the file table begins at "filename" plus 
12 bytes, with "filename" being the tag placed on the DIFSD macro 
instruction. 


b. All processing which is directly related to the add function is performed 
in the open and close transients. Any existing program may be 
modified to add to an output file simply by changing the contents of 
byte ten of its file table. Any existing program which creates an 
output file, if run with the new (5. and higher) transients, will now 
insert the necessary pointers in the file's Format-1 label when it 
CLOSEs the file. This applies to programs written in any language. 


9200/920011/9300/9300II 


APPENDIX U | 2 of 4 Memo #147 





c. The sequential IOCS now uses bytes 98 through 102 of a sequential file's 
Format-l1 label to preserve the pointers which will be used when the file 
is to be added to. The CLOSE transient updates the Format-l to 
include the pointers, whether or not the file was being added to. The 
OPEN transient, if the file is an add file, uses the pointers to locate 
the track and record where output is to begin. It is therefore just 
as important that a SAM file be CLOSEd as an ISAM file. If a program 
aborts before it can CLOSE a SAM file, the Format-l pointers are as 
they were when the program began execution; if other functions of the 
program which aborted can be safely rerun, the sequential file can 
be recovered by rerunning the program from the beginning. 


d. The format of the pointers in the Format-1 label is "ttrll" with: 


tt being the relative track number (starting with X'@@9M@1' as the 
first track 6f the file) of the track containing the end-of-file 


mark. 
r being the record number of the end-of-file mark 
11 being the number of bytes remaining on this track. This value is 


necessary for the I0CS to resume writing data where it left off. 


Since "tt" is a relative value, the file may be copied to different 
physical extents by the Dump/Restore Utility (DPRS) without losing its 
capability of being added to. DPRS preserves this information when 
dumping to tape, restoring from tape, and dumping disc-to-disc. 


e. If an output file has been defined as an add file but bytes 98 through 
102 of its Format-1 label contain binary zeroes, a 23ug display is 
given. The following replies may be made to this display: 


g@ - To retry reading the Format-l label. Could be used if the wrong 
pack were mounted. 


Gl - To cancel the job. 


any other reply - To start writing output data at the beginning of the 
file. 


£. When each volume of a multiple-volume file is closed, the IOCS clears 
bytes 98 to 102 of the Format-l1 label to zeroes to indicate that it 
is not possible to add to this volume of the file. The last volume 
to which data was written must be mounted for adding to proceed. 


g. If it is necessary to modify an RPG program to add to a file, the 
address of the file table may be ascertained as follows: 


(1) Mount a disc pack which does not contain the desired file on the 
correct logical unit. 


(2) Execute the program which would write the file. 


(3) When 23u4 display occurs, the address of the file table is in PROC 
register 13 (locations @#2A-2B). To this address must be added ten 
bytes, as described in 4.a.(3) above, to obtain the address of the 
byte that must be changed from 9M to 94. To verify this, a dump may 
be taken at the 23u4 halt; RPG generates file tables at the top 
of memory with each preceded by a series of 47F% instructions 
similar to those generated by DIFSD in assembler. 


(4) If the same logical unit contains other files defined in the same 
program, this procedure may become complicated or impossible without 
some trial-and-error attempts. 
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5. If a zero reply was given to a 23uD halt, the I0CS did not retry. This 
minor discrepancy has been corrected. JIOCS will only ignore a creation/ 
expiration date error if a reply of greater than one is given. 


6. The new parameter NONT is available in the DSPIT macro. If NONT=YES 
is specified, the sequential IOCS which is generated will have no transient 
capabilities whatsoever. Such a generation would only be desirable if the 
IOCS so generated were to be used in an MOS environment or within a 
symbiont. Although the obsolete "non-transient" SAM macros (DSPI1 and DSPI2) 
are still available with this release, they will not be distributed with any 
future DNCOS releases. No changes have been made to DSPI] or DSPI2 in four 
years. 


7. The sizes of most possible generations of sequential IOCS routines have 
been reduced, in some cases by several hundred bytes. 


8. The sequential IOCS routines which process input and output table files in 
RPG programs have been brought up to the current level of the SAM processor. 


9200/920011/9300/930011 
APPENDIX U 4 of 4 Memo #147 


APPENDIX V. 8411/8414 DIRECT PROCESSOR 


The Direct Processor, comprised of the macros 


DIFDH - Define the File Direct Handler and 
DAMIT -— Direct Access Method I/O Transient 


is a processor designed to allow the user a control over his files 
that is closer to physical IOCS than either the Sequential or Index 
Sequential Access methods. 


The Direct Processor is not a 'random' processor, per se, but allows the 
user to establish any form of file access/maintenance he desires. 


Certain constraints are imposed, e.g. VOL1, Format 4, Format 1, and 
Format 3 label checking; only in the interest of protecting the user 
of the direct processor from himself, particularly during debugging time. 


The Direct Processor allows for three different methods of accessing 
a file: 


1. ID - by address, either absolute or relative 

2. KEY - find by key from a starting address 

3. AFTER ~ write a new record after the last record at 
a given address 


It also allows for three different ways of addressing a file: 


1. Absolute - fixed address including volume no. 
2. ‘Relative Record - range 1 - 65535 
3. Relative Track plus absolute record - range 1 to limit of discs. 


Although a given file can be accessed in any combination of ID, KEY and 
AFTER, it can only be addressed in one of three ways in one DITFDH module. 


Only one DAMIT module is allowable and necessary in one program and through 
keyword parameters may be tailored to cover the necessary options ina 
minimal amount of memory. 


One DTFDH module is necessary for each file to be processed by the 
Direct Processor although any file may be accessed by more than one 
DIFDH module. Other than memory constraints, there is no limit to 
the number of DTFDH modules that may be included in any one program. 


The Direct Processor is not directly available to card assembler users. 
It must be assembled using the Tape/Disc assembler and the relocatable 
result of the assembly punched out and used as input to the card linker, 
The DAMIT may be assembled 


1. Non-transient or 
2. Transient 


When assembled with transient capability OPEN and CLOSE are arbitrarily 
transient and KEY,ID, AFTR and IORG are optionally transient. 


The DIFDH module is non-transient only and needs no notification that it 
is working with a transient or non-transient DAMIT. 
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The sizes of the two modules are as follows: 


DI'FDH 234+(10* (number of volumes in file) )=244 (minimum) 


DAMIT | vnon-trans | Open/close Trans onl All trans 


Input/Output < 3800 < 2700 < 1500 


The FOR control card in DASM can be used to pre-format the various volumes 
of a direct access file in a fashion similar to the control cards of an ISF 
run for an ISAM file. If pre-formatting is desirable, the DR parameter of 
the FOR card can be used even when relative record (REL=R) is not specified 
in DAMIT and/or DTFDH. The above is true for any file to be processed 

by the direct processor when the record size is fixed, (RCFM=FIXUNB) . 






If record size is not fixed (RCFM=UNDEF) or for any reason it is not 
desirable to pre-format the disc, then the only way a file can be 
loaded is by using the WRITE AFTER(,EOF) and WRITE RZERO imperative macros. 
NOTE: The WRITE AFTER(,EOF) and RZERO imperative macro not only update or 
reset the capacity record (R@) but clear the balance of the track after 
the record just written (all of the track after R@ when WRITE RZERO is used). 


While files may be keyed or unkeyed the key size of any given file must remain 
constant throughout the file. 


In unkeyed files KLEN=%. In keyed files key size may range from 3 to 255. 
EOF records (data length=%) have a key in keyed files KLEN bytes long. 


Keyed files can be updated without reference to the key and also the key 
(not its size) can be changed. 


For 8411, record size (RCSZ) may range 
2<RCSZ € 3605~KLEN(+20 if KLEN#Q) ) 


For 8414, 2<RCSZ< 7242 (KLEN(+45 if KLENZ@) ) 
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Some restrictions that existed under DIFRA and DAMIO are no longer pertinent. 
They are: 


ae 


b. 


File accessing - files may now be accessed by ID and/or KEY and/or AFTR 
in any combination. 


Creation Date and Expiration Date are required only on output (TYPF=OUTPUT) 
files. 


Creation Date/Expiration Date check is optional on input files 
(TYPFAOUTPUT) . 


I/O areas (IOA1) need not be specified individually for each file. They 
may be shared between files. The validity of their content if shared 
is under user control. 


Not specifying AFTR=NO when RCFM=UNDEF is no longer an error. These two 
Keyword parameters are independent of each other. 


Please note the changes in IORG content. 


Please note that there is no User Label handling facility in DT FDH/DAMIT 
at present. 


A further explanation of the two RCFM keyword specifications: 


FIXUNB - the data is fixed in size on the disc. If blocked it must 
be unblocked and reblocked by the user as necessary. 


UNDEF ~~ the data is unknown in size or variable in size or both. 


Obviously FIXUNB data may be processed as UNDEF if it is desirable 
for any reason. The converse is not true. 


TYPF parameter specifications have been changed to the following: 


ZOUTPUT — file type is input and no writing of any kind will be 
allowed in this file. 


=OUTPUT - file type is output and may be input also. All read/write 
orders allowed by other parameters will be allowed. 


Write verification is optional and the default is: 


YES, if TYPF=OUTPUT or 
NO, if TYPFAOUTPUT 


A new imperative macro READ GKEY has been initiated. An explanation 
of its function will be found under READ in the imperative macro 
section. 

On a WRITE AFTER,EOF imperative macro, the capacity record (RM) will 
no longer be updated to reflect the EOF record occupying a record 
position. A check will be made to insure the EOF record will. fit 
(if it won't the return is to ERRO under the same conditions as any 
other record that won't fit). Therefore the next WRITE AFTER to 
this track will erase the EOF (extend the file/track) and correctly 
update the capacity record. 
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DIRECT ACCESS METHOD I/O HANDLER 


DAMIT is an updated transientized version of DAMI1 and DAMI2 for use 
with DIFDH. It can be generated as a non-transient if desirable. See 
the keyword parameter NONT. 


DAMIT will theoretically handle an infinite number of files (DIFDH modules). 
It must be generated to include all options specified in each of the DTFDH 
modules it will support. 


The keyword parameters are: (all are optional) 


ABS - default is YES 
Valid Specifications - =NO, =YES, =9 
NO - SKAD symbol will contain relative addressing only. No 
absolute format. 
YES - SKAD symbol will contain absolute addressing for at least 
g one file. 


(see NOTE under REL) 


AFTR - default is YES 
Valid Specifications - =NO, =YES, =%, =TRAN Sees 


NO - No format write commands will be issued (WRITE AFTER(,EOF) and 
WRITE RZERO). 


TRAN - Format write commands will be issued and they will be 
processed by a transient. 


yves\ - Format write commands will be issued and they will be 
g processed by a resident routine. 


NOTE: If AFTRANO, TYPF=OUTPUT must be specified. 
REL=R is invalid, unless ABS#NO, 
ID - default is YES 
Valid Specifications - =NO, =YES, =TRAN, =9 
NO - No READ or WRITE ID macros will be issued. i 


TRAN -— READ and/or WRITE ID macros will be issued and they will be 
processed by a transient. 


yEs| - Same as TRAN, except the processing routine is resident. 


g J 
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IORG - default is YES 

Valid Specifications ~ =NO, =YES, =TRAN, =9% 

NO -~ User does not have a memory location reserved for the absolute 
address of finds by ID or KEY in any of the files being 
handled by DAMIT. 

TRAN -—- User wishes to have absolute address of finds by ID and/or 
KEY presented to him and the routine to do this processing 
is a transient. 


ves} - Same as TRAN, except the processing routine is resident. 


g 
KEY - default is YES 
Valid Specifications - =NO, =YES, =TRAN, =9% 
NO ~ No WRITE or READ KEY (or GKEY) macros will be issued. 
TRAN — WRITE and/or READ KEY (or GKEY) macros will be issued 
and the routine to process them is to be transient. 
REL=R is invalid unless ABSANO. 
yes> ~ Same as TRAN, except the processing routine is to be resident. 
g/ REL=R is invalid unless ABS#NO. 
LBAD — default is NO 
Valid Specifications - =NO, =TRAN, =% 


no} - User header labels will not be processed. 
g 


TRAN - User header labels will be processed and the routine that 
processes them will be transient. 


NONT -— default is NO 


Valid Specifications - =YES, =NO, =9@% 


no} - A non-transient DAMIT is not to be generated. 
g 
YES - A non-transient DAMIT is to be generated. Any other keyword 


being specified =TRAN, where this specification would 
normally be valid, will be an error and prevent the 
generation of DAMIT. Other than =TRAN, all valid r 
combinations of keyword parameter specifications are still 
valid. 


Situations where "NONT=YES" would need to be specified would be 
1. DAMIT is being generated for use within a symbiont, or 


2. In a program which will operate in a Minimum Operating System (MOS) 
environment. 
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RCFM — 


SRCM - 


TYPF - 


default is FIXUNB 

Valid Specifications - =UNDEF, =FIXUNB, =9% 

UNDEF - Both UNDEF and FIXUNB records (or UNDEF only) will be 
processed. 


REL=R is incorrect unless ABS#NO. 


FIXUNB, Only FIXUNB records will be processed. 
g 


default is YES 


Valid Specifications - =NO, =R, =T, =YES, = 
NO - SKAD symbol will only contain absolute addresses. 
R - SKAD symbol will contain relative record addresses for at 


least one file. 
AFTRANO and/or KEYANO and/or RCFM=UNDEF is incorrect unless ABS#NO. 


T - SKAD symbol will contain relative track addresses for at least 
one file. 


YESS — SKAD symbol may contain relative record and relative track 
g addresses. (at least two different files) 


NOTE: 1. One file may be addressed in only one way; that is, it 
may be relative record or relative track or absolute. 


2. The ABS and REL keyword parameters determine how DAMIT 
will decode the SKAD symbol in the various DIFDH modules for 
which it is being generated. 


default is YES 


Valid Specifications - =NO, =YES, =% 


NO - No file will be expecting to search beyond track limits 

on the READ or WRITE KEY (or GKEY) macros that are issued. 
YES$ - Some or all files will be searching on cylinder boundaries. 
g 


NOTE: If SRCMANO, then KEYANO is incorrect, but not fatal to the 
generation of DAMIT; SRCM will be ignored. 

default is INPUT 

Valid Specifications - =OUTPUT, =INPUT, = 


OUTPUT ~ At least one file will have WRITE macros issued for it. 
All READ macros are allowed. 


mpur\, - No WRITE macros will be allowed. All READ macros are 
g allowed. 
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If TYPF=OUTPUT, the creation date (CRDT) specified in an output 
(TYPF=OUTPUT) DTFDH module will be checked against the file 
expiration date and if the check passes, the expiration date 
(XPDT) specified will be written into the file Format 1 label 
as the new expiration date. 


If TYPFZOUTPUT, or an individual DTFDH module has TYPF/OUTPUT 
specified then the creation date/expiration date check is 
optional. 


e.g. 1. If CRDT=symbol and TYPF4OUTPUT in a DIFDH module the 
check will take place. 


2. If CRDT=symbol is not specified and TYPFZOUTPUT is 
specified then the creation date check will not occur. 


NOTE: A "good! creation date check is one in which the contents 
of CRDT symbol is greater than or equal to the contents 
of the expiration date in the Format 1 label of the file. 

In Summary: 


1. An output file must be supported by an output DAMIT and 
specify a creation date and an expiration date. 


2. An input file may be supported by any DAMIT and may specify 
a creation date. Expiration date (XPDT) will be ignored. 
VRFY - default is =NO, if TYPFAOUTPUT or 
; =YES, if TYPF=OUTPUT 
Valid Specifications - =NO, =YES, =97 
NO - No WRITE macros will be check read for parity. 
YES - All WRITE macros will include a check read for parity. 
NOTE: If RM is‘written, it is always check-read. For example, 
in all WRITE AFTER(,EOF) and WRITE RZERO commands, Record g 
will be check-read. 
If a new Format 1 Label is written, it is always check-read. 


(during CRDT/Expiration Date check) 


WAIT ~ default is YES 


Valid Specifications - =NO, =YES, =9% 

NO ~ No WAITF imperative macros will be issued. * 
YES, - WAITF macros will be issued. 

g 


All I/O imperative macros (not OPEN or CLOSE) for 
individual DTFDH modules where WAIT=YES is specified 
become merely head positioning (Seek) instructions. No 
data transfers will take place until the WAITF macro 

is performed. I/O imperative macros issued against 
individual DIFDH modules where WAITYES is specified are 
unaffected by either specification for the WAIT keyword 
parameter in DAMIT. 
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DI'FDH KEYWORD PARAMETERS 


AFTR - enable use of format write commands 
Optional - default is NO 
Valid Specifications - =YES, =NO, =9 
=YES is specified when it is the intention of the user to use 
any of the imperative macros; WRITE AFTER, WRITE AFTER,EOF or 
WRITE RZERO. 
=NO| is specified when none of the above imperative macros will 
=~ be used. 
BKSZ — size of IOAL 
Required 
Valid Specifications - A decimal value in the range: greater than 2 
and less than or equal to track capacity 
(+8, if AFTR=YES). 
BKSZ specifies the size of the I/O area (IOA1). 
The following factors determine the value of BKSZ: 
1. The length of the data section of the disc record to be read 
or written. If variable in size (RCFM=UNDEF), it should 


accomodate the largest possible. 


2. The length of the key section (KLEN=n) of the disc record to 
be read or written. This need only be considered if: 


KLENZ@ and 
AFTR and/or RDID and/or WRID is = YES 


3. The length of the count section (8 bytes) of the disc record 
to be written if: 


AFTR=YES 
See IOA1 Contents and IOA1L Organization charts for the various 
make-ups of IOAl, and therefore the size (BKSZ) of IOA1. 


Minimum BKSZ specifications are: 


KLEN + 11 if AFTR=YES 
KLEN + 3 if AFTRAYES 
CRDT ~ creation date 
Conditionally Required 
Valid Specification ~ CRDT=symbol 
CRDT=symbol is required if TYPF=OUTPUT. Symbol is the label 
of a 6-byte creation date to be checked against the 
expiration date of the file. 
If TYPF/OUTPUT the creation date/expiration date check is optional. 


See TYPF keyword parameter in DAMIT for a discussion 
on date check. 
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} One possibility of the contents of CRDT symbol are YYMMDD where: 


YY - year 

MM — month 

DD - day 
in EBCDIC. 


DEVx - Relative volume number and logical unit number of device for this 
file. 


Optional — default is DEV1=9% 
Valid Specifications ~ DEVx=n where: 


x - is the relative volume number in the range 1-8, and 
n - is the logical unit number 


DEV1 specifies the first volume of file, DEV2 the second, DEV3 the 
third, etc. 

DVNO - the number of DEVx specifications that are valid. 
Required 


Valid Specifications - DVNO=n where n is in the range 1-8. 


QS ERRO - user error routine 
Required 
Valid Specification - ERRO=symbol 
Symbol is the label of the user error routine to which control will 
be returned under certain error conditions after the file has been 
opened error-free. 
Error bits will be set in the Error Bytes of the DIFDH filetable. 
They are located at filename + 64109 or filetable +1619 or r15+16j0. 
Control may be returned to ERRO after any READ or WRITE macro. 


See the Error Byte table for the contents and meaning of the various 
settings that may occur. 


Error symbol must be on a half-word boundary. 


FLID - file identification 
Required 
Valid Specification - FLID=symbol 
Symbol is the label of a 44 byte file identification or label. 


Its contents must be identical to that specified in the LBL card 
when the file was DASM'd. 
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IOAl - 


IORG - 


KARG - 


I/O area 
Required 
Valid Specification - IOAl=symbol 


Symbol is the label of a user area in which the disc I/O 
operations will take place. It is BKSZ bytes in length. 


See the IOA1 Contents and IOA1 Organization charts for the make-up 
of the IOA1 area. 


IOA1 must be on a half-word boundary if AFTR=YES. 


I/O address register 

Optional - default is no IORG. 

Valid Specification - IORG=symbol 

Symbol is the label of a 6 byte area located by the user which will 
contain the absolute disc address and volume number of the last 
disc access prior to termination of the CCW chain. This address is 
supplied by the direct processor at the conclusion of the last 
imperative macro. (not OPEN or CLOSE) 


The address will be in the form, in binary: 


MYC@HR where 

M - relative volume number 
gc - cylinder 

gH ~ head 

R -—-— record 


See the IORG chart for the representation of this address. 


IORG must be on a half-word boundary. 


key argument location 

Conditionally Required 

Valid Specification ~ KARG=symbol 

Symbol is the label of a user area reserved to contain the key 
to be searched for during a READ KEY (or GKEY) or WRITE KEY 


imperative macro, and is KLEN bytes in length. 


KARG=symbol is required only if RDKY or WRKY is = YES. 
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KLEN - key length 
Conditionally Required 
Valid Specification - KLEN=n where n is decimal and the range of n is 
2<n<256 and if the file was preformatted with the 
FOR card of DASM, n agrees with the key length 
specified in the FOR card. 
KLEN=n is required only if RDKY or WRKY is = YES or 
if the file has keys and AFTR=YES is specified, or 
if the file has keys and REL=R 
All keys in the same file must be the same length. 


If only ID (READ ID, WRITE ID) processing is to be done it is 
not necessary to specify KLEN=n in files that are keyed unless: 


It is desirable to update or examine the keys, or 


Address the file in REL=R format. 


LBAD — not available initially 


RCFM ~ record format 
Optional - default is FIXUNB 
Valid Specifications - =UNDEF, =FIXUNB, =97 


=UNDEF is specified when the length of the data section is unknown 
and/or variable. This specification requires the specification 
RCSZ=r and precludes the use of relative record addressing 
(REL=R) . 


=FIXUNBlLis specified when the length of the data section of the disc 
= record is known and fixed in size. In this case the size 
of the data section is BKSZ —- (KLEN + (8,if AFTR=YES)). 


RCSZ — record size 
Conditionally Required 


Valid Specification - RCSZ=r where r is a general register ir the 
range 7<r<14. 


Reading - The RCSZ register will contain the length of the data 
section at the successful conclusion of the READ order. 
That is, it is supplied by the Direct Processor. 


Writing - The RCSZ register will be loaded by the user with the length of 
the data section prior to giving the WRITE order (even if 
WAITF is used and WAIT=YES is specified). 


RCSZ=r - will be ignored if RCFM/UNDEF and must be specified if 
RCFM=UNDEF. 
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RDID — intention to use READ ID imperative macro V@ 
Optional - default is RDID=NO 
Valid Specifications ~ =YES, =NO, =% 


=YES - if KLEN/@ both key and data sections will be read when a 
READ ID imperative macro is issued. If KLEN=% only the 
data section will be read whether the file is keyed or not. 


=N - No READ ID imperative macros will be issued. 


=f 


RDKY - intention to use READ KEY or READ GKEY imperative macro 


Optional - default is NO. 
Valid Specifications - =YES, =NO, =9% 


=YES -~ Requires KLEN/%, KARG=symbol is specified. Precludes the 
use of relative record addressing (REL=R) and implies that 
READ KEY and/or READ GKEY imperative macros will be issued. 


=NOl - No READ KEY or READ GKEY imperative macros will be issued. 
=G 


REL 
Optional - default is no relative addressing (=9) 
Valid Specifications ~ =R, =T, =% noel 


=R - Cannot be used when RDKY, WRKY, or AFTR=YES. Cannot be 
used when RCFM=UNDEF. 
Specifies that SKAD symbol will contain a relative record 
address where the lst record in the file is 1. If files 
are keyed, see the ID processing paragraph under KLEN. 


=T - May be used under all conditions. Specifies that SKAD symbol 
will contain a relative track and: 


for READ or WRITE ID -— an absolute record number 

for READ or WRITE KEY — a record number of binary zero 
or all WRITE AFTER's 

The lst track of the file is track l. 


=f - May be used under all conditions. Specifies that SKAD symbol 
will contain a relative volume number and absolute disc address 
with the same consideration for record number as shown under . 
REL=T. 
SKAD - File Addressing Method 
Required 


Valid Specification — SKAD=symbol 


Symbol is the label of an eight-byte area reserved by the user to 
contain the (starting) disc address at which the next imperative 
macro is to take place. 


SKAD symbol must be on a half-—word boundary. a 
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When REL=R its format is @@~@PP¥rr where: 


rr is the binary relative record number at which the 
next READ or WRITE ID will take place, 


When REL=T its format is 9@@A%Pttr where: 


tt is the binary relative track number at which the 
next I/O operation will take place 


r is the abolute record number for ID operations 
(READ and WRITE) 
r is @ for KEY (READ and WRITE) and all WRITE AFTER operations. 


Note: in both relative record and relative track, the first record 
or first track in the file is l. 


When REL=@ (or is unspecified) its format is M@Y@CAHR where: 


- is the binary relative volume number 
is the binary cylinder number 

- is the binary head (track) number 

- is the binary record number 


DoaAS 
I 


As in REL=T, R is the absolute record number for ID operations 
(READ and WRITE) or 


@ for KEY (READ and WRITE) and all WRITE AFTER operations. 


SRCM — search multiple tracks 
Optional - default is NO 
Valid Specifications - =YES, =NO, =% 


If SRCM=YES is specified and the volume:on which the search for key 

is to take place has the file allocated on cylinder boundaries then the 
search for key (READ KEY, READ GKEY, WRITE KEY) will start at 

the beginning of the track in SKAD symbol and continue until a find 

is made or end-of-cylinder is detected by the hardware, whichever 
occurs first. 


If SRCM=NO (or ZY) is specified or the volume on which the search is 

to take place does not have the file allocated on cylinder boundaries, then 
the search for key will be restricted to the track specified by 

SKAD symbol. 


TABL— Extent Table 
Required 
Valid Specification - TABL=symbol 
Symbol is the label of 16*n bytes reserved by the user to contain 
the extents and other pertinent file information. Sixteen bytes 
must be reserved for each extent of the file. n is the number 
of extents in the file. There is a maximum of 16 extents per volume 
and 8 volumes/file. 


TABL symbol must be on a half-word boundary. 


See DTFDH figure for the contents of the 16 byte Extent Table. 
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IYPF -— Type of File 
Optional - default is INPUT 
Valid Specification ~ =OUTPUT, =INPUT, =% 
=OUTPUT - The contents of the CRDT symbol will be checked against 
the file expiration date. The XPDT symbol contents will 
become the new expiration date of the file and all I/0 


macros may be issued against the file. 


See TYPF keyword parameter in DAMIT for a discussion of 
date check when TYPF/OUTPUT. 


=INPUT - No writing of any kind will take place or be allowed on this 
= file. Only READ ID, READ KEY and READ GKEY imperative macros 


will be allowed. 


VRFY - Verify Write 
Optional - default is 


=NO - if TYPF4OUTPUT 
=YES - if TYPF=OUTPUT 


Valid Specifications - =YES, =NO, =@% 


=YES -— Write parity check will occur on all WRITE imperative 
macros. 


=NO - Only file control records such as RY, FORMAT1 will be 
verified when they are written. 


WAIT — Wait for I/O Operation 
Optional - default is NO 
Valid Specifications - =YES, =NO, =97 


=YES ~- On all READ and WRITE imperative macros only head movement 
(if necessary) will take place. Data transfers will not 
take place until the WAITF imperative macro is issued. 
That is, as soon as head movement has been initiated, 
control will be returned to the user. 


=NO\_ - Head movement and data transfer will be initiated upon 

# issue of the READ or WRITE command and control will not 
be returned to the user until the issued CCW chain 
reaches termination. 


No effect on OPEN/CLOSE macros. 


See WAIT keyword parameter in DAMIT for a further discussion of the 
WAITF imperative macro. 
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WRID - Intention to use WRITE ID imperative macro 
Optional - default is NO 
Valid Specifications - =YES, =NO, =% 


=YES - Specifies an intention to use the imperative macro 


WRITE ID 
=NO\. - No WRITE ID imperative macros will: be iddued by the 
=o J user. 


WRKY - Intention to use WRITE KEY imperative macro 


Optional - default is NO 


Valid Specifications ~ =YES, =NO, =9% 

=YES - Specifies an intention to use the imperative macro 
WRITE KEY. 

=NO\, — No WRITE KEY imperative macros will be issued by 

=f the user. 


XPDT ~- Expiration Date 
Conditionally Required 
Valid Specifications - XPDT=symbol 
If TYPF=OUTPUT, the XPDT symbol is required and will contain 


the new expiration date for the file in which one possible 
form is YYMMDD where: 


YY - Year 
MM - Month 
DD —- Day 


in EBCDIC. (This is a standard form) 


If TYPFAOUTPUT, the XPDT symbol will be ignored and is not 
required. 


XTEN - File Extent Count 
Optional 
Valid Specification - XTEN=symbol 
If it is desired by the user to obtain a count of the number 
of extents in the file, he will specify XTEN=symbol and 
DIFDH will present the number of extents in XTEN symbol at 
the end of opening the file. 


The count will be in binary and XTEN symbol must be ona 
half-word boundary. 
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IMPERATIVE MACROS — DTFDH 


I OPEN 


The OPEN macro will open the file to allow accessing by the 
READ/WRITE macros. Validation checks will be performed 

on the VOL1,FORMAT4, FORMAT] and FORMAT3 labels as required. 
File accessing as specified for DAMIT will be checked against 
the processing specified by the individual DIFDH files as 
they are opened to insure that DAMIT covers the options 
required by the DTFDH modules. 


Format: 










Label 
name 


AOperation A Operand 
filename 


filename -— the symbol of the appropriate DI'FDH macro; the file 
to be opened. 


II READ 





The READ macro reads a record from disc to the IOA1 area. 
If WAIT=YES was specified, the WAITF macro must be issued 
to actually cause the data transfer to take place, as the 
READ will only cause arm movement to occur. 


Format: 





Positional Parameter 1 
filename is the symbol of the appropriate DTFDH macro. 
Positional Parameter 2 


ID -—- RDID=YES must have. been specified in the DTFDH macro for 
this file. A read into IOA1 will occur from the address 
specified by SKAD, If KLEN#@ both key and data will 
be read; if KLEN=9, only the data section will be read, whether 
the file has keys or not. 


KEY and —- RDKY=YES must have been specified in the DTFDH macro 
GKEY for this file. A search for the key in the location . 
KARG symbol will be initiated at the track specified 
by SKAD (RELAR). If SRCM=YES and the volume has the 
file allocated by cylinder an unsuccessful search 
will run to end-of-cylinder; if either of these 
is not true, an unsuccessful search will occur at 
end-of-track. 


A successful search (find) for the KEY positional 
parameter is equality; for GKEY it is when the key 
from the disc record is equal to or greater than 
the contents of KARG symbol. The key from disc 
will not be read into IOA1. 
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IiI WRITE 


There are two forms of the WRITE macro. One performs format writes 
(count, key, data); the other performs non-format writes (key, data). 
In either case the writing of a key is under the control of the KLEN 
parameter of DIFDH, i.e. if KLEN=%, the writes are count, data; and 
data only respectively. The format writes also clear the balance 

of the track after writing the record. 


The format writes are AFTER; AFTER,EOF and RZERO. All others are 
non-—format writes. 


If VRFY=YES was specified all written records will be check read 
for parity. 


A. Non-format WRITE 
Used to update a file in existence or create a file on volumes 
that have been pre-formatted; see FOR card in DASM. WRITE KEY 


cannot be used to create a file. 


Format: 










Label 4 OperationA Operand 
ID" 
name iene ex 


Positional Parameter 1 


filename - the symbol of the appropriate DIFDH macro 
‘Positional Parameter 2 


ID -— WRID=YES must have been specified in the DTFDH macro for 
this file. The record in IOAl1 will be written at the 
disc address specified by SKAD for a length of 


1. BKS2Z, if RCFM=FIXUNB or 
2. RCSZ+KLEN, if RCFM=UNDEF 


If KLEN/@ both key and data will be written; if KLEN=9% 
only the data section will be written, whether the 
file has keys or not. 


KEY -— WRKY=YES must have been specified in the DTFDH macro 
for this file. The record in IOA1 will be written when a 
match is found for the key in KARG symbol, which will 
be located on disc at, or after, the address in SKAD 
symbol. 


if SRCM=YES and the volume has the file allocated:+on 
cylinder boundaries, the search will continue until a 
match is made or end-of-cylinder is detected, whichever 
occurs first. If either of the above is not true, the 
search for match will be confined to the track specified 
in SKAD symbol. 
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B. Format WRITE 


Used to clear, create and/or extend a file. 





A OperationA 


Positional Parameter 1 
filename - the symbol of the appropriate DTFDH macro 
Positional Parameter 2 


AFTER - a new record, contained in IOA1, is to be written 
after the current last record on the track specified 
in SKAD symbol (RELAR). The new record (count, 
key (if KLEN4Z) and data) is written and the 
remainder of the track is cleared. The Capacity 
Record* (RY) will be updated to reflect the new last 
record and remaining recording space on the track. 


If an examination of R@ shows insufficient space to 
record this record 


1. The record will not be written and 
2. R@ will not be updated 


and return will be to the user ERRO routine with the 
error bytes of DIFDH reflecting the reason for entry 
into ERRO. 


*Record Zero (Rf#) of each track of a file processed by 
WRITE AFTER(,EOF) imperative macros must contain in its 
data section a ‘capacity record'. This capacity 
record is initialized by a WRITE RZERO command and 
is examined by each WRITE AFTER(,EOF) command issued 
against the track. See the Record Zero (Track 
Descriptor) Record layout for the content and format 
of this record. 


AFTER,EOF - An EOF (data length=@) record is to be written after 
the current last record on the track specified in 
SKAD symbol. Except for the fact that RM will not 
be updated to reflect the existence of the EOF record, 
it is processed the same as data being recorded with 
an AFTER positional parameter. : 


RZERO ~- clear the track specified in SKAD symbol and reset R@ 
to reflect the entire track as available for recording. 
This form can be used to clear a track or a file. 


If WAIT=YES was specified in DTFDH then the WAITF imperative macro 
must be issued to cause writing in any form to take place. The 
WRITE macro will only cause head positioning. 
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IV WAITF 


If the DIFDH macro was generated with WAIT=YES specified, then 
the WAITF imperative macro must be issued after all READ or WRITE 
macros to cause the data transfer to take place. 


If WAITF macros are issued to a file in which WAIT=YES was not 
specified, return will be immediate. 


Format: | 





Positional Parameter 1 


filename -— is the symbol of the appropriate DTFDH macro. 


V CLOSE 
The CLOSE imperative macro initiates termination procedures: for 
the file specified and marks it as closed. It must be re-opened 
before any READ's or WRITE's are issued. 


Format: 





Label 






4 Operation& 
(name) filename 
Positional Parameter 1 
filename - the symbol of the appropriate DTFDH macro; the file 
to be closed. 
VI NOTES 


On return to the user after all imperative macros 


1. Registers 8-13 will be restored to their original contents, 
i.e. what they contained before the macro was issued. 


2. Register 14 will point to the next instruction on the DIFDH 
filename table after the macro last was executed. See filename 
+f through +48 in the DIFDH layout. 


3. Register 15 will point to the lst byte (FLID) of the file table 
for that DTFDH. 
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DIRECT PROCESSOR HALT/DISPLAYS 


DISPLAY MEANING ACTION | 


-< 


i 


aaa 
ae 


wa 
Ee 
ae 





The options selected to process the 
file (DIF) and the I/O handling 
capabilities (DAMIT) are not 
compatible. 


Any response is 
CANCEL. 






























One of the following errors has been 

detected on the file on Physical Unit u: 

1. ID process and SKAD record no. is g 

2. Invalid Vol. No. in an absolute 
address. 

3. SKAD address is highest’ allowed.. 

4. SKAD record no. is>track allows. 

5. Unsupported imperative macro. 

6. One of the required half-—word 
aligned parameters is not ona 
half-word boundary. 





Any response is 
CANCEL. 




























Attempting to OPEN an opened file or 
CLOSE an unopened file. 


Any response 
CANCEL. 





@/1 CANCEL 
4(G/1) IGNORE 


The calculated record size is greater 
than the BKSZ parameter specified. 













A CCW chain has a program error in it. Any response 


CANCEL. 






An Imperative Macro has been issued 
without an intervening WAITF on a 
file expecting WAITFs to be issued. 


Any response 
CANCEL. 
















A CCW chain has returned a 'hardware 
error' status on an unopened file. 


Any response 
CANCEL. 









An imperative macro has been issued 
against an unopened file. 


Any response 
CANCEL. 





















@ RETRY 
70 CANCEL 


Volume sequence check has failed in 
opening a file. 






The record found as a Format 4 (VTOC) 
record does not have an ID of '4', 






g@ RETRY 
7@ CANCEL 






A bad dispatcher status (length error, EOF 
or no find) has been returned on the 
search for VOL1 or FMT4. 


Any response is 
CANCEL. 
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cont. 














An error status of 'EOF' or ‘Wrong 
Length' has been returned on the 
search for the Format 1 label. 







@ RETRY 
7@ CANCEL 


24uc Q@ RETRY : 
7@ CANCEL 
24uD The record found as the Format 1 @ RETRY 
does not have an ID of l. 7@ CANCEL 
g 


RETRY 
7@ CANCEL 













Cannot find the Format~-l label 
(File ID). The file is not on 
this pack. 










The Creation Date/Expiration Date 
Check has failed. 












Either bad status (either length error, 
EOF or no find) or the ID is not 
'3' on the search for a Format 3. 


@ RETRY 
7@ CANCEL 
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DAMIT KEYWORD PARAMETERS 


LY 
KEYWORD DEFAULT VALID COMMENTS 
See No file is using absolute addresses. 
1 or more files are using absolute addresses. 
No format WRITES will be issued. @Q@@©O® 
Format WRITES will be issued against 1 
or more files. 
Imperative macros with ID positional parameter 
will be issued against 1 or more files. 
aie No files have specified an IORG symbol. 
1 or more files have specified IORG symbol. 
aoe 
on No macros with KEY positional parameter eae) 
be issued. 
Imperative macros with KEY positional parameter 
will be issued for 1 or more files. : 
TRAN a@® 
pmo | OT AVAILABLE INITIALLY 
FIXUNB UNDEF Both types (UNDEF and FIXUNB) supported. 
FIXUNB Only RCFM=FIXUNB files will be supported. 
gee eo No file is using relative addresses. @ 
KEYZNO 
REL=R and < AFTRANO and ABS=NO is an ERROR. 
RCFM=UNDEF 
1 or more files expect to search multi-track - 
(KEY) nd 
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cont. 


KEYWORD DEFAULT VALID 


OUTPUT WRITE macros allowed. Expiration date checked 
and _ updated. 


INPUT No WRITE allowed. Optional date check and 
expiration date update. 


*I£f VRFY is unspecified and 


1. TYPF=OUTPUT, default is VRFY=YES or 
2. TYPFAOUTPUT, default is VRFY=NO 
No WAITF imperative macro will be issued. 


WAITF macro will be issued against 1 or 
more files. 





ABS=NO and REL=NO is an ERROR 


AFTR=NO' and ID=NO and KEY=NO is an ERROR. 


Format WRITEs are WRITE AFTER(,EOF) and WRITE RZERO 


@ 
@ 
@ See REL keyword. 
@ 
© 


TYPF=OUTPUT must be specified if any WRITE macros are issued. 
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DTI FDH KEYWORD PARAMETERS 


DEFAULT VALID COMMENTS 
pono No FORMAT WRITES will be issued 
against this file. 
YES FORMAT WRITES may be issued against 
this file. 

ERROR MIN. REQD. 
REQUIRED IF SYMBOL 
TYPF=OUTPUT 
OPTIONAL IF 
TYPFAOUTPUT 
_ a 
DVNO ERROR 1-8 (10) 

ERRO 


ERROR SYMBOL 
IOA1 


ERROR SYMBOL 
IORG No IORG SYMBOL 
KARG See SYMBOL 
RDKY, WRKY 
KLEN No KEY 3-255 (10) 
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KEYWORD 




















Number of bytes in IOAl1 area. 
Minimum required is: 

KLEN+11 if AFTR=YES; or 
KLEN+3 if AFTRAYES 





Address of Creation Date - used to 
test against file Expiration date. 









No. of devices in file and their 
logical unit number. That is, 
DEV1=7 means the lst volume is 
located on L/U 7. 














The number of DEV, specs. The number 
of volumes in the file. 






The address of the user Error Routine, 
See the Error Byte chart. 








The address of the input/output area. 
It is BKSZ bytes in size. 


The address of the 6 byte area to 
which disc addresses will be returned 
by DAMIT. See IORG chart. 








. 


The address of the key in memory. It 
is KLEN bytes in size. Required for 
KEY processing only. 







The size of KARG and/or the key 
section on disc. KLEN is required on 
keyed files when REL=R, even if 

not KEY processing. 







1 of 3 


KEYWORD DEFAULT VALID COMMENTS 


Defines the disc records as being 


known and all the same size (FIXUNB) 
or not (UNDEF) 


RCSZ See 8-13 (10) If RCFM=UNDEF, then RCSZ=n, where n 
RCFM=UNDEF is a general register (8-13). Not 
. required or used when RCFM=FIXUNB. 


RDID 





No READ ID imperative macros will be 
issued. 


READ ID macros may be issued against 
this file. 


NO 
YES 
RDKY NO No READ KEY (or GKEY) imperative 
macros will be issued. 
YES READ KEY (or GKEY) macros may be 
issued. 
REL . No REL R SKAD address will be relative record. 
No KEY or AFTR processing allowed. 
T SKAD address will be relative track. 
No REL SKAD address is absolute with 
relative volume number. 


Address of the 8 byte area containing 
the disc address. The format of 
SKAD is specified by REL. 


a 
Pat 





On KEY macros, no multi-track 
searching. 


On KEY macros, multi-track search if 
volume is cylinder allocated. 





TABL ERROR SYMBOL Address of area 16 times number of 
file extents in size. 
TYPF INPUT OUTPUT All macros allowed. File Expiration 
date checked & updated. 
INPUT Only READ macros alllowed. File 
Expiration date optionally checked - 
not updated. 
2 of 3 
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" | 
KEYWORD | DEFAULT VALID 





YES 


REQUIRED IF 





TYPF=OUTPUT 





NO XTEN SYMBOL 





COMMENTS 


*If VRFY is unspecified and 

1. TYPF=OUTPUT, then default is 
VRFY=YES or 

2. TYPF4OUTPUT, then default is 
VRFY=NO 


No WAITFs will be issued. Complete 
Gisc I/O on READ or WRITE. 

WAITF will be issued. Disc I/0 
completed on WAITF. 

No WRITE ID imperative macros will be 
issued. 

WRITE ID macros may be issued. 
TYPF=OUTPUT 

No WRITE KEY imperative macros will 
be issued. 

WRITE KEY macros may be issued. 
TYPF=OUTPUT 


Address of 6 byte Expiration Date, 
required if TYPF=OUTPUT 


User wishes a count of file extents 
placed in this 2 byte location. 
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ERROR BYTES - STATUS CODE 


LOCATED AT FILENAME+6419 or r15+16]90 ON RETURN TO ERRO SYMBOL 


Not Used. 
Length Error. 
Fixed-length (RCFM=FIXUNB) - any length discrepancy between 
the size specified by the count section of the disc and 
BKSZ parameter for READ or WRITE macros. See Note l. 
Undefined (RCFM=UNDEF) 
A. WRITE macros - any length discrepancy between the size 
specified by the count section of disc and the RCSZ plus 
KLEN parameters. See Note 2. 


B. READ macros - only if BKSZ is less than the size 
specified by the count section of the disc record. 


Not Used. 

Not Used. 

No room on track. 

A WRITE AFTER(,EOF) has been attempted on a track whose 
capacity record (RY) shows insufficient space to write 
the record. R@ has not been altered and no portion of the 
record has been written. 

Not Used. 

Not Used. 

Not Used. 

Not Used. 

Not Used. 

Not Used. 


Data Check - hardware failure 


The READ or WRITE macro has not successfully terminated. 
Either ignore the error and continue processing or close the 
run and notify Sperry Univac field engineers. 


Record Not Found. 


A READ or WRITE imperative macro, other than WRITE AFTER(, EOF) 
has an ID or KEY which cannot be found within the limits of the 
command. 
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cont. 


End of File. 

A READ macro has processed a record with a data length of zero. 

Not Used. 

Invalid ID 

1. An absolute address has been specified with a record number 
beyond the capacity of a track. 

2. An address beyond the limits of this file has been 
specified, either absolute or relative. 










ERROR BYTES - STATUS CODE 


Note 1 - BKSZ¢(key length (if KLENA%) plus data length or data length only 
if in only key processing of the count section of the disc record 


1. WRITE macros - the smaller of the two factors will determine 
the number of bytes transferred from memory to the disc. 


A. If BKSZ is smaller, the balance of the disc record 
will be cleared to binary @. 


B. If BKSZ is larger, the recording will be truncated. 
2. READ macro —- the smaller of the two factors will 
determine the number of bytes transferred to memory. 
Note 2 ~- RCSZ + KLEN # key length (if KLEN4@) plus data length of 


the count section of the disc record. 


WRITE macros — see Note 1 on WRITE macros substituting 
RCSZ + KLEN for BKSZ. 
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0000 


0001 
0002 
0004 


0008 


0010 
0020 
0040 


0080 


0100 
0200 
0400 


0800 


1000 
2000 
4000 


8000 


1/7* 
1/6 

1/5* 
1/4* 


1/3* 
1/2 
1/1 
1/0 


0/7 


0/6 


0/5 
0/4* 


0/3 
0/2 
0/1* 
0/0 


ERROR BYTES — HEX REPRESENTATION 


No Error 


Invalid ID 
Not Used 
End-of-File 


Not Found 


Data Check 
Not Used 
Not Used 


Not Used 


Not Used 
Not Used 
Not Used 


No Room 


Not Used 
Not Used 
Length Error 


Not Used 
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TYPE OF SKAD CONTENTS 
ACCESS @ 





ACCESS/ADDRESS COMPATIBILITY 
RCFM=UNDEF not allowed 
Not REL=R or REL=T 


Positional Parameter of Imperative 


®OQOQo 


Also AFTER,EOF and RZERO 





ad 
COUNT, DATA 
COUNT, KEY, DATA 
RDID=YES DATA 
or COUNT, DATA 
KEY, DATA 
COUNT, KEY, 
RDKY=YES 
or - COUNT, KEY, DATA 
WRKY=YES = KEY, DATA 
COUNT, KEY, DATA 
IOA1 CONTENTS 
Se 
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Notes on IOAl Organization 


Although a file can only be addressed one way, relative track, relative record 
or absolute, it can be accessed in all ways. 


For example, if the specifications have been made in DIFDH; AFTR=YES, RDID=YES, 


WRKY=YES (or any other combinations of AFTR, ID and KEY keywords) then the 
breakdown of IOA1 is: 


1. The first 8 bytes are reserved for the count. 

2. The next KLEN bytes are reserved for the key. 

3. The balance of IOA1 (BKSZ-—(KLEN+8)) is reserved for the 
data section. 


That is, a READ KEY imperative macro would always supply the data of the 
record found at IOA1+8+KLEN and a WRITE KEY command would start recording on 
disc with data being supplied starting at IOA1+8+KLEN 


READ ID (and WRITE ID) would process data starting at IOA1+8 and the first 
KLEN bytes processed would be the key of the record. 


Format write IOA1 thru IOA1+7 will contain the actual disc address at the 
conclusion of the imperative macro. 


IOA1 ORGANIZATION 
































KLEN=% SKAD is ABSOLUTE or 
REL=T or 
REL=R (not if RCFM=UNDEF) 
{——-— -—- BKszZ. 1 ID_ PROCESSING IORG will be M@CGHR 
— — eA ee hey eg es of next record 
IOAL lexey +; €<—- DATA emia aa KARG — meaningless 
/-KLEN >| é—— RCSZ -—-~---> 2567 KLEN>2 
Ke BKSZ —--——_-——] KEY_PROCESSING SKAD is ABSOLUTE or 
—————————— REL=T 
TOAL [{<———-mara ——_j IORG will be M@C@HR of 
current record 
K——__-—_—__~ Resz — ---—-— 7 : 
2567KLEN72 KARG is key 
i<8 ane <{—--RCSZ-— -- - 3? KLEN=% SKAD is ABSOLUTE or 
REL=T 
IOA1 k- couse d« ~~ - DAT. 7 AFTER PROCESSING 
———————_______— ——--—_ 
: eee = ae KARG - meaningless 
IOA1 k- coun KEY~}<- DATA -——> 
< 8- —ale KLENYC-RCSZ >| 2567 KLEN> 2 


* COUNT is indeterminate before executing. 
COUNT is YCHHRKDD after execution. 
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IOAL ORGANIZATION FOR COMBINED AFTER(RZERO), ID AND/OR KEY PROCESSING 


SKAD is ABSOLUTE or REL=T 
IORG = LABEL as desired 


TYPF = OUTPUT 
MAY BE KARG KARG = LABEL (if KEY processing) 
KLEN = key length (if KEY 


processing or file has keys) 
RCFM=UNDEF or FIXUNB as desired 
RCSZ = r if RCFM=UNDEF 
SRCM = YES or NO as desired 

(KEY processing only) 


BKSZ_ =} 








bere ee ea ee RCSZ ——- —-—-—- ——- >| 


L RCSZ specified only if RCFM=UNDEF 
READ KEY, READ GKEY, WRITE KEY 
-READ ID, WRITE ID (IF KLEN=9) 


READ ID, WRITE ID (IF KLENZ@) 


WRITE RZERO, WRITE AFTER (AND AFTER, EOF) 
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LUT# owew 


IIOOE6/O00€6/1I100Z6/00Z6 


Ge FO €€ 


A XIGNGddv 






NORMAL RETURN ERRO RETURN 












ID OF NEXT ALL 1 BITS ALL 1 BITS ID OF EOF 
RECORD IN FILE RECORD 
** 


IF OF THIS ID OF NEXT ID OF EOF 
RECORD RECORD IN FILE RECORD 
ak 










ID OF THIS 
RECORD 








-NOT Wee 
See SRCM 




























KEY ID OF THIS ID OF THIS ID OF NEXT ID OF EOF 
~MULTITRACK~ RECORD RECORD __ RECORD IN FILE RECORD 
See SRCM xe 





ALL 1 BITS auisims | ang 1 ars ALL 1 BITS 


IORG CONTENTS 


* See ERROR bytes 


** All 1 bits if next record is 
beyond last extent of last 
volume of the file 


FUNCTION 
FIND FIND 
OTHER THAN LAST LAST IN FILE NO FIND* EOF* 


RECORD ZERO (TRACK DESCRIPTOR) RECORD 


In files processed with AFTER imperative macros, the data section of Record Zero 
of each track serves as a ‘capacity record'. This capacity record is 
initialized on each successful WRITE RZERO macro and is checked and updated 

on each successful WRITE AFTER macro. It is checked only on each 

WRITE AFTER, EOF macro. 


The format of this capacity record is: 


Bytes 
(¢] 2 3 
G6 c PG H RR, T T GF ~ Data Section Record Zero 


where: 
Bytes I The logical cylinder no. (binary) 
3 The logical head no. (binary) 


4 Current last record number on this track - initially zero 
(binary) 


5-6 Capacity of this track in bytes-initially. 


Space remaining expressed in bytes after each successful 
WRITE AFTER (binary) 


Bytes 0,2,7 are reserved. 


FILE CREATION (LOADING) 


A. File has been pre-formatted using FOR card. See DASM. 
WRITE ID 
a. SKAD may be ABSOLUTE, REL=T, or REL=R 


b. KLEN and KARG defined as desired; subsequent updating or retrieval 
by key? formatted with key? 


c. Supply address to SKAD (randomly developed addresses or next 
sequential address) and data to IOAl and issue WRITE ID. 


dad. IOAl is organized as shown in the IOA1 organization chart. 


B. File has not been pre-formatted, or it is desired to re-establish the file. 


1. WRITE RZERO 





a. SKAD may be ABSOLUTE or REL=T (record no. specified as @) 


b. Issue WRITE RZERO commands to all tracks of the file. This will 
initialize R@ and clear the tracks, then 


2. WRITE AFTER 


a. Supply address to SKAD, data to IOA1+8 and issue WRITE AFTER. 
Addressing may be randomly developed or sequential. 


b. IOA1l is organized as shown in the IOA1 organization chart. 
3. WRITE AFTER, EOF 
An EOF record (data length @ key length is KLEN) may be 


written after last record of a track or file. 
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DIFDH. YOUT 





FILENAME FILETABLE 










FN 


ee 


oa e+e 
“Eh 
3 






READ 
GKEY 


WRITE 
NOT 
XR supporTED 
READ 
WRITE 
W222 -RZERO 
WRITE 
ID 76] XTEN 


XwW?t 
XW?A 






wo (oh 
uv 

fax) 

© 

HO an 
8 18 
Be 18, 


12 [XR2G 










16 


20 


a8 
an 


wo 


24 


0 S> 
2, 
— 
£ 


LE 







28 


32 


36 


Th 
2 
$ 


Ta 
8 
an 
i 


40 













EXTERNAL TO DI FDH 


EXTENT TABLE (S) 


se 
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XF2P 1 
+| FLID [crpr 


EXT. TABLE HIGH RTA 
ADDR IN VOL. 


VoL. EXTS IN 
NO. voL. 
EXT, TABLE | HIGH RTA 
ADDR IN VOL. 






EXTS IN 
voL. 
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1. 


WwW Y 
TRACK OVERH 
LENGTH 8 


CCW CHAINS (MAX 19) 
FN FT 
112 64 


WORKING STORAGE 






R  SKAD STORAGE 


s T 
MULTI DIVIDE 
FACTOR FACTOR 


160 
168 
EAD | MAX RCRDS 176 


XF?4 
DIF FLAGS (FILENAME+56) 


RCFM= | VRFY=/ SRCM {RELY REL= |TYPF= 

UNDEF | YES =YES |R/T T OUTPUT 

IORG=| LBAD=| RDKY | RDID|WRKY| WRID/AFTR 

LABEL | LABEL|=YES |=YES | =YES/ =YES | =YES 
g 1 2 3 4 5 6 7 


XF?I 
I/O FLAGS (FILENAME+99) 


I/O | SEEK 
OPEN] VOL1 
FMT4 | FMT1 WFM1 | WUHL 


ee ae et ee 
g I 2 3 4 5 6 


VOLUME TABLE FLAGS (FN+233) 














OPEN; CYL 
mee RESERVED 
g 1 , eames aaa | 


If RCFM=UNDEF, then RCSZ is DCY(r+r-16) 
if RCFM=FIXUNB, then RCSZ is 
BKSZ+KEY ae TER 
8 


only in lst of each file 
DATA GAP+OVERHEAD 
RCFM=FIXUNB only 

if SRCM=YES and volume has 
on cylinder allocated 


file - 
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APPENDIX W.  DTFMT, DMTIO, DMTIT 


A. DIFMT 
To correct the following problem: 
When the proc call line specified: TYPE=INPUT, or when not used, the 


-default is INPUT. Some coding was not generated which could cause 
a PROC ABN or erroneous results. 


B. DMTIO 
The following problems have been corrected: 


1. When the proc call line specified OUPT=NO, some coding was not 
generated causing an undefined (U) error in the listing. 


2. The correction of a tag conflict which could result in not getting 
a valid 'EOV1' trailer label. 


3. If the checkpoint constant and the 'EOF', '‘EOV', and 'HDR' constants 
fell at the beginning of a memory block being dumped by the 
checkpoint routine, errors could occur during checkpoint restart. 


4. If the keyword parameter INPT=NO was specified, undefined (U) errors 
occurred. 


5. Redesign of the coding for 2fu3 or 2fu4 halts to insure the return 
branch is to the coding which initiated the branch to the error 
coding. Prior to this, the error coding always returned to the 
OPEN coding. 

The following enhancement has been made: 


A check for tape DEVICE-ID during the OPEN. If the unit is not assigned 
to tape, an X'600E' error message will be issued. 
C. DMTIT 

The following problems have been corrected: 

1. When generating, using the following call, two undefined (U) errors 
were given: 

DMTIT GET=TRAN , PUT=TRAN , WORK=YES 

2. If the checkpoint constant and the 'EOF', 'EOV', and 'HDR' constants 
fill at the beginning of a memory block being dumped by the 
checkpoint routine, errors could occur during checkpoint restart. 


The following enhancement has been made: 


A check for tape DEVICE-ID during the OPEN. If the unit is not assigned 
to tape, an X'600E' error message will be issued. 
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APPENDIX X.. THE SYSTEM EXECUTION AREA, 


ee : 
NY 
1. 
2. 
* ; 
3. 
Ne 


Introduction. 


The System Execution Area and its related software were intended to 

be used in an OS-500 environment to make possible faster response to 
inquiries and to decrease the impact of inquiries on the main ("batch") 
job. However, there is nothing which prevents its use in any other 
disc-resident operating system environment and we highly recommend its use 
to any installation to whom throughput is important. While certain 
similarities may be observed between this 9300 software and the use of 

a system execution area under OS-4 or other operating systems, programmers 
should not make any assumptions about the 9300 software based on their 
knowledge of other systems. 


Definitions. 


System Execution Area ~- A single-extent file, with a file-i.d. of "SYSEXAR". 
This file must be cylinder-aligned and occupy a whole number of cylinders, 
up to a maximum of 64. At any given moment during the operation of the 
9300 operating system, there is only one System Execution Area. It is the 
file labelled SYSEXAR on the disc drive from which the operating system was 
booted. It is to this file that programs are written by the Formattor and 
from which programs are loaded when the execution of programs in the 
system execution area is requested. 

Formattor - As of this software release, a new utility called "SHEAF" 

(for System Highspeed Execution Area Formattor) is being supplied. The 
necessary statements for linking SHEAF are included with those for all 
other utilities in the run stream element CDS. The purpose of SHEAF 

is to pre-format the System Execution Area and to write loadable programs 
in it. It does this as directed by commands presented to it in the 
control stream (see "Formattor Operation" below). SHEAF's input consists 
of loadable programs in library files. Its output consists of more 
efficiently written copies of these programs in the System Execution Area. 
The programs are written out in blocks of sizes varying up to the 

maximum capacity of a track (3625 bytes for 8411, 7294 bytes for 8414). 
SHEAF also generates indices and other control information necessary for 
loading the programs and for maintaining SYSEXAR. 

Fast Loader - As of this release, a transient named "FAST?LDR" is 

supplied which is written to head 13, record 1 of TRANSCYL by TRAN. The 
purpose of this transient is to locate and load programs from SYSEXAR. 
Once a program is loaded, the Supervisor "remembers" which loader was used 
to load the program and uses the same loader to load overlays of that 
program in response to the FETCH macro. 

Slow Loader - This is the familiar Supervisor program locator/loader 
routine which is generated as a part of the Supervisor and written to 

head Y, record 1 of TRANSCYL by TRAN. This loader locates and loads 
programs from library files. The additional code which was required within 
the Supervisor for choosing between fast and slow loaders was more than 
offset by economies of coding achieved in other areas. ; 


| 
i 
| 
i 
| 
i 
: 
i 
' 
4 
| 


Advantages and Disadvantages of Using SYSEXAR. 


If you have observed the operation of your system for any length of time, 
you have noticed the delay of several seconds which occurs at each job step 
when the Supervisor must locate and load first the Job Control Program, then 
the user program named in.an EXEC statement. This delay occurs because, 
when the Supervisor locates each program, it must first search the 

Volume Table of Contents (VTOC) for the file containing the program, then 
search the file directory by reading one record after another until it 
locates the directory entry for that program. To load the program, it 

must read one record at a time from the data extent of the library file. 
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Each 160-byte record contains a maximum of 124 bytes of program text. To —_— 
load a program consisting of 12.4-K bytes of text, therefore, at least 

100 disc accesses must be made, each consuming at least one disc revolution. 

Such a program would occupy 4 8414 or 6 8411 tracks. If the same program 

were copied to SYSEXAR by SHEAF, it could then be located by means of a 

single search-on-key command and loaded by a single chain of read commands 

consuming only two or four disc revolutions. It would occupy 2 8414 

tracks or 4 8411 tracks. It should be obvious that several seconds would 

be saved at each job step. The performance of a segmented program which 

issues numerous FETCHes would be improved noticeably. 


On the debit side, programs which are to be loaded by the fast loader must 

always be located on the system resident disc unit. Their maintenance may 

not be as easy as the maintenance of a standard library file by LIBS since 

SHEAF does not offer any means of copying a system execution area (or j 
portions of it) from pack to pack. SHEAF also does not have any ability to 
compress out programs which have been deleted. When SYSEXAR is full, 

it must either be rebuilt by a new SHEAF run to copy all desired elements from 
library files, or must be expanded by using DASM to create a larger SYSEXAR, 
perhaps at the expense of other files on the same pack. Although SYSEXAR 

may be copied to tape or to a backup pack by the Dump/Restore Utility (DPRS), 
this procedure still does not condense the amount of material contained in 

the file. In addition, should SYSEXAR be destroyed through hardware, software 
or other error, it may be necessary to have the original library-format 
loadable programs available so that it can be rebuilt. This could 

necessitate tying up library file space. 


You should weigh these pros and cons_when deciding which programs should be 

placed in SYSEXAR. 0S-500 installations will obviously prefer to put all, 

or most, of their inquiry programs in SYSEXAR. Job Control should also be 

included. Other candidates for inclusion in SYSEXAR would be any 

user programs or UNIVAC utilities which are used frequently or any program : 
which makes significant use of segmentation. If Job Control is placed in — 
SYSEXAR, a copy of JBCN must be preserved in SYSFILE, since it is this JBCN 

that is loaded at IPL time. It would not be desirable to put TRAN in 

SYSEXAR since TRAN must be capable of running in the absense of any 

transients and the fast loader transient must be called to load all 

programs from the System Execution Area. It may not be desirable to put 

SHEAF in SYSEXAR because of the possibility of it being destroyed by 

errors occurring during its own execution. The RPG compiler (R11T) must 

not be put in SYSEXAR since its operation is dependent on its ability 

to interface with the "slow" locator/loader routine. 


4. How to Execute Programs in SYSEXAR. 


A program which has been copied to SYSEXAR by SHEAF may be executed through 
the control stream by means of the following statement: 


/ EXEC program-name, EX 


The operation of a program which is executed from SYSEXAR is indistinguishable 
with that of a program which is loaded fram a conventional library file. 

Job Control is only able to determine, when loading a program from the 

System Execution Area, whether or not it requires the use of tape units. 

There is no information as to which tape units are needed. Programs which 
are loaded from the System Execution Area may be used in conjunction with 

the Transient Tape Dispatcher in systems generated with that option. 


5. Formattor Operation. 


The System Highspeed Execution Area Formattor (SHEAF) is loaded and 
executed by the following control stream: 
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EXEC SHEAF 
DATA T 


NN“ 


é 
« commands 


/* 


The Formattor recognizes three commands - FORMAT, ADD and DELETE, whose 
use is described below. The commands are free-form to the extent that 
they may begin in any column from 1 through 16. Operands, if any, must 
be separated from commands by at least one space and must end before 
column 73. Spaces may not be embedded in commands or in operand strings. 
SHEAF generates no halts other than usual IOCS displays. It produces a 
number of self-explanatory error messages. All error messages are 
preceeded by "J" in print positions one through eight. Informational 
messages are preceeded by "*" and input statements by "$" in the same 
positions. Any card whose first sixteen columns are blank is ignored 
and not printed. 


a. The FORMAT Command. 


The FORMAT command instructs SHEAF that it is to initialize the System 
Execution Area. This command, if used, must be the first statement read 
by the Formattor; it will be ignored if it is preceded by any other 
command. It has a single, optional parameter, a decimal number which 
defines the number of tracks which are to be pre-formatted for index 
use. If the parameter is omitted, SHEAF formats a single index track. 
The remaining tracks of SYSEXAR are erased. 


Examples: 
FORMAT 5 causes formatting of 5 index tracks 
FORMAT (blanks) causes formatting one index track 


Each index track holds 17 records if SYSEXAR is on an 8411 disc, 27 if 8414, 
The first record of the first index track is an "index control block" 

and is used by SHEAF for maintenance purposes. This index control 

block is updated after successful completion of all processing associated 
with each command. If any situation occurs during the processing of 

a command which could cause invalid information to be written on the 

index control block or invalid program text to be copied, SHEAF cancels 

the job. The contents of SYSEXAR, its index, and the index control 

block are usable through the last successfully-processed command. 


Each index record consists of a 16-byte key containing program-i.d. 

and phase-i.d. and a 104-byte data area which includes such control 
information as program size, base address and transfer address, as 

well as the command control word (CCW) chain which the fast loader will 
use to load the program. All information in the index record which 
pertains to disc locations is made relative so that SYSEXAR may be 
copied to any disc location. The address fields of transfer-in-channel 
(TIC) and search-i.d. commands are also relocatable and are converted 
by the fast loader transient to absolute addresses at load time. 

If a single-phase program is written without the "NOCLEAR" option 

(see "ADD Command" below), it requires only one index record. The 
number of index records required by programs written with "NOCLEAR" 
specified depends on the degree of fragmentation of the text of each 
program. 


When SHEAF addes so many programs to SYSEXAR that it exhausts available 
index space, it makes use of the first track on the next available 
cylinder as an index track and pre-formats it before writing any 

index information on it. If you anticipate including a large number 

of programs in your System Execution Area, it is to your advantage to 
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allocate, via the FORMAT statement, several index tracks. This will 
cause faster access time for any program in SYSEXAR. We have found 
that about one index track per 15-20 text tracks will be necessary. 

The disc allocation map at the end of each SHEAF listing may be 
helpful in judging the relative amount of index space required for your 
programs. 


The FORMAT command is only used when it is necessary to initialize or 
rebuild SYSEXAR. If SHEAF is being used for adding programs to an 
existing SXSEXAR, FORMAT must not be used. 


b. The ADD Command, 


The ADD command instructs SHEAF to search for a loadable program in a library 
file and then to copy it to SYSEXAR. If the program is found, any 

program which previously existed in SYSEXAR which had the same name is 
deleted. Any index records which are required for locating and loading 

the program being ADDed are written. The ADD statement has four 

parameters which must be separated from each other by commas; omitted 
parameters must be accounted for by consecutive commas but trailing 

commas may be omitted. The four parameters are: 


1. program-i.d. - the one to eight~character name by which the program 
is located and loaded. This parameter is required in each ADD 
command. 


2. logical unit number - a one or two-digit hexadecimal value; the disc 
unit containing the library file which contains the program to be 
ADDed. This parameter is optional; until some logical unit number 
is specified, zero is assumed; if an ADD command omits logical unit 

. Number, the last number specified is assumed. 


3. file-i.d. —- the name of the library file containing the program to be 
ADDed. This parameter is also optional; until some file-i.d. is 
specified, SYSFILE is assumed; whenever it is omitted, the last 
file-i.d. specified is used. 


4. mode of output —- NOCLEAR or omitted; if this parameter is omitted, 
SHEAF assumes that the entire area occupied by the program, as 
defined by its program-i.d. record, is to be cleared to binary 
zeros where no text is provided and that the program is to be 
written in SYSEXAR with the largest blocksize possible. If NOCLEAR 
is specified, only those areas which are to contain program text 
will be written out. This may result in slower loading and less 
efficient utilization of disc space but there are situations where 
the NOCLEAR option must be specified. 


Examples: 

ADD JBCN (1) 
ADD LIBS (2) 
ADD KSMB (3) 
ADD INQ1,,LOADLIB (4) 
ADD REPORT5,1,RPGOUTPT, NOCLEAR (5) 
ADD INQ2,2,LINKFILE (6) 
ADD INQ3,,TESTFILE (7) 
ADD X,@1 (8) 
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Examples (1) through (3) above add programs from SYSFILE on logical 
unit zero. 

Example (4) adds a program from LOADLIB on logical unit zero. 
Example (5) adds an RPG-generated program. 

Example (6) adds adds a program from LINKFILE on logical unit two. 
Example (7) adds a program from TESTFILE on logical unit two. 
Example (8) adds a program from TESTFILE on logical unit one. 


Use of the NOCLEAR specification is mandatory in the following 
cases: 


(1) If a program contains patches introduces by LIBS via the 
DATA statement, and if these patches include branches to 
locations outside the area occupied by the program. 

(2) If a program contains ORG statements adjusting the location 
counter to absolute addresses outside the program area. 

(3) If some area within the program is to be used for receiving 
information from a previously-executed program. Areas 
defined by the COM Assembler directive or COMMON statement 
in FORTRAN are examples of such communications areas. 


If a program includes large buffer areas which do not need to 

be pre-cleared and its text (instructions and constants) is 
contiguous (not broken up by DS or ORG statements), a more efficient 
use of SYSEXAR will result from specifying NOCLEAR. The loadable 
programs produced by the RPG compiler are usually so contiguous 

that their copying with NOCLEAR specified may save some space in 
SYSEXAR. 


When SHEAF copies a segmented program and NOCLEAR is not specified, 
it will write out the root phase such that the whole area occupied 
by the program will be cleared when the root phase is loaded. It 
writes out all overlays as though NOCLEAR were specified, thus 
causing any work areas to be preserved when overlays are loaded. 


c. The DELETE Command 


The DELETE command instructs SHEAF that it is to delete a program from 
the System Execution Area index. The key portion of any index record(s) 
pertaining to the program is filled with 16 bytes of X'@1'. The DELETE 
command uses one mandatory operand, which is the name of the program 

to be deleted. 


Examples: 


DELETE ABC 
DELETE /XYZ 


Deleting programs from SYSEXAR does not cause any freeing of space or 
compression to take place; it only makes the named program unlocatable. 
It is not necessary to delete programs before adding new programs with 
the same names; this is accomplished as a part of the ADD processing. 
Only one copy of a program with a given program-i.d. can exist in 
SYSEXAR at one time. 


d. Miscellaneous Features, 


When SHEAF is executed, it always updates the location within the 
Supervisor which contains the starting and ending cylinder numbers of 
SYSEXAR. If you have reallocated files so as to cause SYSEXAR to have 
different boundaries, you must either execute SHEAF or reboot the system 
to cause this information to be brought up to date. 
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If SYSEXAR has been expanded, whether or not it starts in the same 
place, SHEAF is aware of this and erases the additional tracks 
(providing it is able to read an index control block) before 
processing any commands. 


If it is only necessary to obtain a listing, or map, of the contents 
of SYSEXAR, SHEAF may be executed without any input statements 
between the / DATA T and /* cards. The map always includes the 
location of the next available text and index records; this gives an 
indication of how close to being full SYSEXAR is. 


In DELETE and ADD commands, program-i.d.'s may optionally be preceded 
by a slash. There is no capability for searching within library 
groups; the first loadable program with the name specified will be 
copied. 
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APPENDIX Y. HALTS. 


The following are new or changed halt displays pertinent to this release. This 


information should be inserted in your copy of Halt Displays Programmer/Operator 


Reference (UP-7719 Rev 4). 


HALT SOFTWARE AREA 


gBxx RPG 


QEEE RPG 


23ug Sequential Access 
Method (SAM) 


23uD Sequential Access 
Method (SAM) 


24xx Direct Access Method 
(DAM) 


_2Bh1 Dump/Restore (DPRS). 
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MEANING RECOVERY ACTION 


Each bit of xx display To. continue, depress 
corresponds to a H1 START switch. 
thru H8 halt indicator. 


X'#1' represents H8 
X'#2' represents H7 
X'g4' represents H6 
X'98' represents H5 
X'1g* represents H4 
X'2%' represents H3 
X'49' represents H2 
X'8f' represents H1 


If more than one bit 

is set, the correspond- 
ing Hl thru H8 RPG 
halt combinations have 


occurred. 

An EXCPT calculation Press START to cancel the 
specification and at job. Correct the program 
least one output and restart. 


specification (contain- 
ing an E in column 15) 
were not present. Both 
specifications are 


required. 

A file on physical unit To retry the read of the 
u has been defined as Format 1 label, press 

an add file but its START. To cancel the job, 
Format 1 label next- reply #1. To start 
record pointers writing data at the 


contain binary zeroes. beginning of the file, 
reply #2 or greater. 


Creation/expiration To retry the Format 1 
date error on unit u. read, press START. 
To cancel the job, 
reply #1. 


To ignore the error, 
reply #2 or greater. 


See Appendix V for meaning and recovery action 
for all 24xx halts. 


The unit type in See "2Bhe" in halt 
column 7 of card h is manual for recovery. 
not appropriate for 

the specified function; 

OR 

a dump to or restore 

from cards was 

requested but either 

no punch IOCS was 

linked to DPRS or 

insufficient memory 

exists to carry out 

such functions. 


1 of 4 APPENDIX Y 


HALT 


4QuE 


4155 


4171 


41A3 


41cg 


41cl 


41C2 


SOFTWARE AREA 


Fast Locator/ 
Loader 


Job Control 


Inquiry IOCS 
(DIFUQ) 


Concurrent Supervisor 


Job Control 


Job Control 


OS-500 Job 
Control 


APPENDIX Y 


MEANING 


In addition to other 
meanings, this halt 
may indicate that 
SYSEXAR has not been 
allocated or that its 
Index Control Block 
is unreadable. 


The program to be 
executed is linked so 
low as to overlay the 
Supervisor. 


In addition to other 
meanings, this halt 
may indicate that this 
generation of DIFUQ is 
incompatible with the 
type of inquiry device 
or that a single- 
inquiry-mode program 
is being executed with 
a Supervisor that was 
generated without the 
SQWS parameter. 


The buffered print 
file could not be 
located. 


TRANSCYL has not 
been initialized 
for this Supervisor. 


The disc pack from 
which the system was 
booted does not 
contain a file 
labelled TRANSCYL. 


Unable to format 


the roll-out file 
due to disc errors. 
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RECOVERY ACTION 


None. Press START to 
cancel the job. 


None. Press START to 
cancel the job. 


None. IOCS goes to 
Supervisor end-of 
inguiry routine. 


When START is pressed, 
Supervisor locator MSG 
14xx or 4%xx is displayed. 
To this second message, 
reply non-zero to cancel 
or zero to retry the 
search. 


Press START to continue. 
This halt is to be expected 
when booting from a newly- 
created system pack; at any 
other time it would indicate 
that the contents of the 
transient file have been 
destroyed. TRAN must be 
run immediately to 
initialize TRANSCYL. 


None. This system pack is 
unusable until it has had 
TRANSCYL allocated on it 

by the Direct Access Space 
Management program (DASM). 


Press START to retry. If 
halt persists, area 
occupied by ROLLOUT must 
be reprepped. 
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4 . HALT 


41C3 


41c4 


41CA 


41CB 


41CC 


41Du 


41Eu 





SOFTWARE AREA 


0S-500 Job Control 


OS—500 Job Control 


Supervisor 


Supervisor 


Supervisor 


Job Control 


Job Control 
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MEANING 


The roll-out file 
is not cylinder- 
aligned. 


The roll-out file 
is not big enough 
to roll out the 
largest possible 
main job to be run 
in this system. 


In a PARAM card, an 
expected comma was not 
encountered or a PARAM 
R card did not end on 
a blank column. 


The address ina 
PARAM card would 
cause the patch to 
be applied to 
restricted memory, 
to areas beyond the 
size of the machine, 
or (if a PARAM R 
card) the address 
is odd. 


In a PARAM card, the 
digits making up the 
address, length, or 
(PARAM R only) contents 
of a patch were not 
hexadecimal digits (from 
zero through F). 


The volume serial 
number of the disc on 
physical unit u does 
not match the one 
specified in a VOL 
statement. 


In processing a VOL 
statement, Job Control 
was unable to read the 
VOL1 label on physical 
unit u. Either a read 
error occurred OR the 
record read was not a 
VOL1 label. 
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RECOVERY ACTION 


Press START to continue 
processing. It will not 
be possible to activate 
non-resident inquiry 
programs until ROLLOUT ' 
is re-allocated on 
cylinder boundaries. 


As for 41C3. ROLLOUT must 
be reallocated. 


Clear the reader, correct 
the erroneous PARAM card, 
and press START to retry. 


Same as 41CA. 


Same as 41CA, 


Mount the correct. disc 
pack on physical unit u, 
then press START. To 
cancel, make an X'F#! 
operator request, then 
press START. 


Same as 41Du; it may be 


necessary to reprep the 
disc pack. 5 
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HALT 


SOFTWARE AREA 


44us Fast Locator/ 
Loader 
69u4 Supervisor 
(disc dispatcher) 
69u5 Supervisor 
(disc dispatcher) 
6EEE Sort/Merge 
(PHASEZRO) 
74BB Transient 
write-out (TRAN) 
J4EE Transient 
write-out (TRAN) 
T4FF TRAN 
APPENDIX Y 


MEANING 


While trying to locate 
or load a program in 
SYSEXAR on physical 
unit u, an error 
status occurred. 
Possible values of 

s are: 

l=software error 
2=data check 

3=end of file 
4=no-find 
8=wrong-length 


Track overrun has 
occurred on 
physical unit u. 


An invalid command 
sequence was issued 
to physical unit u. 


Number of records 
written by the Sort 
does not equal 
number of records 
read. 


Insufficient room - 
remains on the current 
track to write out 

the requested transient. 


TRANSCYL cannot be 
located on the 
output unit. 


The relocatable 
module which was 
to be written out 
as a transient 
cannot be located 
on the input unit. 
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RECOVERY ACTION 


Press START to cancel; 
make non-zero reply to 
retry. 


Press START to skip the 
disc request packet. The 
track on which the error 
occurred must be erased 
or reprepped. 


Press START to skip the 
disc request packet. A 
program error may have 
caused the CCW chain to 
contain an invalid command 
or otherwise issue a 
command that could not be 
accepted by the disc control 
unit. 


Reply X'@1' to ignore 
the error; any other 


reply causes job ad 
cancellation. 


Same as for 7444, 
Press START to retry 
the search. 


Same as for 74EE. 
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£12._84Il DNCOS (Disc) Rev. 5.0.0 : : 
13.8414 DNOOS (Disc) Rev. 5.0.0 | " : 


Oooo 











** CHECK BOX FOR SOFTWARE REQUIRED, 


REQUESTED BY: 


SIGNATURE APPROVED 
ATTN: . USER D.P. MGR/LOCAL S.A. MGR. 


SPECIAL_INSTRUCTIONS:; 











SEE PAGE 3 OF 3 - ORDERING PROCEDURES 








REMARKS AND/OR_ ADDRESS CORRECTIO SEND REQUEST FORM_TO: 
SPERRY UNIVAC 

SOFTWARE ORDER SERVICES 
TOWNSHIP LINE AND JOLLY RD. 
BLUE BELL, PA. 19422 


NOTE; ALL USERS OUTSIDE THE UNITED STATES SHOULD CHECK WITH THEIR 
LOCAL UNIVAC SUBSIDIARY OFFICE FOR DISTRIBUTION PROCEDURES. 


SPERRYSUNIVAC 
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CUMPUTEH SYSTEMS PHILADELPHIA DEVELOPMENT CENTER 
re SOFTWARE ORDER SERVICES 
itu oan eee si iaaans 
SOFTWARE SYSTEM SUPPORT REQUEST 
DIV. MKT, — ORGN. ASSIGN. 
SOFTWARE REQUESTED MEMO _# DATE = MEDIA REQUIRED 
CL. 84lI/14 DNCOS (Via Tape) Rev. 5.0.0 147 4.75 2 - Tapes ; 


2 - Disc/ Tapes 
| - Disc/ 2 - Tapes | 
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